HOW TO BACKUP, UNLOCK, OR MODIFY COPY-PROTECTED SOFTWARE 
Hardcore 



Voluma 3 Number 3 $2.S€ 



I'l 



ZAXXON: 

A Softkey for the Apple Version 
Arcade j 



III' 



m 



m 



m 



(^c 



'sM-t 



r#^. 



^ 



-isj 



1-2, 



^mk, 



fiff 



m 



I '^j 4':;^i\>*^kicV 



Hardcore COMPUTIST 
P.O. Box 44549 
Tacoma, WA 98444 



COREFILER: 

A Complete File Management 
System for the Home or Small 
Business 



DISK DIRECTORY 
DESIGNER: 

Create a New Look for your 
Disk's Catalog 



BULK RATE 
U.S. Postage 

PAID 
Tacoma, WA 

Permit No. 269 




APPLIED ENGINEERING IS 100% APPLE 

Thafs Why We're So Good At It! 



THE NEWKMEMASTER II 



Aucomatl^lly due 
stamps flies with ^J^, 
PRO-005 ^ 




NtW TJSI 
DESIGN 
All official 
PRO-DOS Clock 



• Just plug it in and your programs can resd ilie year, month, riate, riay, 
and time to 1 millisecondl The only dock with both year and ms. 

• A rechargeable NiCad battery will keep theTIMEMASTER H running 
for over ten years, 

• Powerful 2K ROM driver — No Clock Could be easier to use. 

• Full emulation of most other clocks, including Thunderclock and 
Appiecfock (but you'll like the TIMLMASTER II mode better). 

We emulate other clocks by merely dropping off features. We can 
emulate them but they can't emulate us, 

• Basic, Machine Code, CP/M and Pascal software on 2 disks! 

• Eight software controlled interrupts so you can execute two programs 
at the same time (many examples are included), 

• Orvboard timer lets you time any interval upto48 days longdownto 
the nearest millisecond. 

The TIM EM ASTER I! includes 2 disks with some really fantastic time 
oriented programs (over 40) including apptjintment book so you'll 
never forget to do anything again. Enter your appointments up to a 
year in advance then forget them. Appointment book will remind you 
in plenty o( time. Plus DOS dater so it will automatically add the date 
when disk files are created or modified. The disk is over a J2 00.00 
value along— we give the software others sell. All software packages 
for business, data base management and communications are made 
to read the TIMEMASTER II, If you want the most powerful and the 
eaisiest to use clock for your Apple, you want a TIMEMASTER II. 
PRtCE$1 29.00 



Super Music Synthesizer 
Improved Hardware and Software 





Complete 1 6 voice music synthesiser on one card. Just plug it into 

your Apple, connect the audio cable (supplied) to your stereo, boot 

the disk supplied and you are ready to input and play songs 

It's easy to program music with our compose software. You will start 

right away at inputting your favorite songs. The H i- Res screen shows 

what you have entered in standard sheet music format. 

Now with new improved software for the easiest and the fastest 

music input system available anywhere. 

We give you lots of software, In addition to Compose and Play 

programs, 2 disks are filled with over 30 songs ready to play. 

Easy to program in Basic to generate complex sound effects. Now 

your games can have explosions, phaser zaps, train whistles, death 

cries. You name it, this card can do IL 

Four white noise generators which are great for sound effects. 

Plays music in true stereo as well as true discrete quadraphonic. 

full control of attack, volume, decay, sustain and release. 

Wi 11 pfay songs written for ALF synthesiser (ALE software wil 1 not take 

advanlageof all our card's features. Their software sounds the same 

in our synthesiser.) 

Our card will play notes from JOHZ to beyond human hearing. 

Automatic shutoff on power-up or if reset is pushed. 

Many many more features, PRICE Sl59 00 



Z-80 PLUSI 




• TOTALLY compatible with ALL CP/M software. 

• The oniy Z-60 card with a special 2K "CP/M detectoi" chip. 

• Fully compatible with microsoft disks (no pre-boot required). 

• Specifically designed for high speed operation in the Apple Me (runs 
just as fast in the 11+ and Franklin). 

• Runs WORD STAR, dBASE II, CO6OL-S0, FORTRAN-80, 
PEACHTREE and ALL olher CP/M software with no pre-boot, 

• A semi-custom l,C. and a low parts count allows the Z-SO Plus to fly 
thru CP/M prc^ramsatavery low power leveL (We use theZ-BOAat 
fast 4 MHZ.) 

• Does EVERYTHING the other Z-80 boards do, plus Z-80 interrupts. 

Don't confuse the Z-SO Plus with crude copies of the n^icrosoft card. The 
Z-30 Plus employs a much more sophisticated and reliable design. With 
the Z-80 Plus you can access the largest body of software in existence. 
Two computers in oneandtheadvantages of both, all atan unbelievably 

'"" f'"^"- PRICE $139.00 



Viewmaster 80 
Itiere used to be about a dozen 80 cotumn car^s for I he Apple, now 
Ihere^s only ONE, 

• TOTALLY Videx Compatible. 

• 80 characters by 24 lines, with a sharp 7x9 dot matriK, 

• On-board 40/SO soft video switch with manuaMO column override 

• Fully compatible with ALL Apple languages and software— there are 
NO exceptions, 

• Low power consumption through the use of CMOS devices. 

• All connections are made with standard video connectors, 

• Both upper and lower case characters are standard. 

• All new design (using a new Microprocessor based C.R.T, controller) 
for a beautiful razor sharp display. 

• The VIEWMASTER incorporates all the featuresofallotherBOcolumn 
cards, plus many new improvements. 
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PRICE $T79,00 



• Expands your Apple lie to 192K memory, MemoiyMaster 

• Provides an 80 column text display, 

• Compatible with alt Apple lie 80 column and extended 80 column 
card software (same physical sise as Apple's 64 K card). 

• Can be used asasolldstatediskdrive to make your programs run up 
to 20 times FASTER (the 64 K configuration will act as half a drive). 

• Permits your lie to use the new double high resolution graphics. 

• Automatically expands Visicalc to 95 K storage in 80 columns! The 
64 K config. is ail that's needed, 1 28 K can take you even higher. 

• PRO-DOS will usetheMemoryMasterlleasahigh speed disk drive. 



[e 128K RAM Card 

• Precision software disk emulation tor Basic, Pascal and CP/M is 
available at a very low cosL NOT copy protected. 

• Documentation included, we show you how to use all 192K, 

I f ynu already have App I e' s M K ca r(f, j u SI orderllip rvl E (VI O R YMAST E R 1 1 <> with 64 K ind u se 
the 64 K from your old boarrj to give you a fufM 26K. {Tii^ boaid is fully socketed so you 
tm^piy plug in moie chips.^ 

MemoryMaster lie with 128K $249 

Upgradeable MemoryMaster Me with 64 K $169 

Non-Upgradeable MemoryMasler lie wilh 64 K $149 



Our boards are far superior lo iritKC i^i Ihe ton^umer electronics nr>ade today. All I.C.'sart in higii quality sot.Jtftti wilh mii-hfjer. lurriponents used [iiroiighout. P.C 6oardsare giasi- 
epoKy v^tii gold Lontaclv Made in America to be the best in the worid. All products work inlheAPPLtllE.tl, l[+ and Erankiir. The MemoryMaster i ie is i tc only. Applied [ngineering 
aisomanuratturesafulllineofdaraacqui4ilionandconEfoJpfOdurisfortiteApplerA/Dconvertersanddigitalt/Ocards,fltcPteasef.allformorelnformati(Jn.Alluurproductsafelulty 
[p^Ted witii complete dorumentatroii and available for irT>fnediato delivery. All products are guaranteed wllh a no ftassle THfttE YIAR WARRANTT. 



Teias Residents Add S% Sales Tax 

Add $10.00 If Outside U.S.A. 

Dealer Inquiries Welcome 



Send Check or Money OEder to: 

APPLIED ENGINEERING 

P.O. Box 798 

Carrol I Ion, TX 75006 



Call (214) 492-2027 

8 a.nn. to 11 p,m, 7 days a week 

MasterCard, Visa & C.O.O. Welcome 

No extra charge for credit cards 
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Highest Quality, Lifetime Guarantee! 

DISKETTES 

(^^ >^^ SVa" soft-sectored, hub ring. 
4>JL»05 envelopes, double density, 
double-sided on APPLE drives - 100 for 
$1 55, 1 00 single-sided for $1 49. 

Hard plastic stand-up 10-diskette carrying 
cases $2.75 each, 4 for $1 (beige, black, 
blue, green, grey, red, yellow). Smoked- 
plastic flip-top 75 diskette file cases, 
$1 9.50. Heavy-duty nibbling tool, $22. 

Disk Drives 

d^lOO "'00% APPLE-compatible, 40- 
4>1W track, full-size, Siemens type 
quality drives, with manufacturer's 1-year 
warrantee. Conlroller card, $65. 

COD & VISA/'Master Card orders welcome. 
Add $4 for shipping & handling (only $2 for 
orders under $50) plus 6% sales tax for DC 
residents. Send for our catalog. 

VF ASSOCIATES 

Western Ave.. N.W., Wash., D.C. 20015 
(202)363-1313 
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ONE PASS COPY 

The Copy 
Does for dislts what 

Don't tei backing-up sloKt ymi down 

Enannples-. 

Copy Apple System Master on one 

drive In one pass and 38 seconds 

comDared id two and a tialt minutes 

witn COPYA 

Copy a disk with a 128 sector 

fame oi> two drives in EIGHTEEN 
ECONDS(nvs. 1 minute 33 
seconds with COPYA. 

RAM DRIVE $24.95 

Use ydui exita msmory as a Disfe Dtive^ 
No hardware needed. 

All DQS cnmmanns wofk the same, 
310 sectots with a 1 2aK Apple lie, 
63 sectors on any 64 K Apple lie 

or II +. That's rrore room ihan any 
ottier sol (ware 

Incredlljly last — you have to see il 
to appreciate ttie speed and reliatiility 
Full package of utilities 



$29.95 

Machine 

Xerox did tor paper. 

■ This is (tiefaslest possible cnijy system 
on Apples 

• Make backing up a pleasure. Copy 
most disks in one pass and a fraction 
of the time. 

• Change pajameters - IfJII Sypass 
dad sectors, etc. 

• If you backup your wotk. you owe it to 
yourself to use ONE PASS COPY 

SPEED-DOS $24.95 

■ ln?prayesSAVE. LOAO.BLOAO. 
BSAVE RUN and BRUN times 
U)) to 500%. 

■ Compatible with RAM DRIVE, all DCS 
commands, most programs. 

■ Bload HI-RES screen from floppy in 
3 seconds, from RAM DRIVE in half 
a second^ 

■ Coirpletely unprotected. Add to 
any pragram. 



SPECIAL POWER PACK 
GET ALL 3 DISKS 



for only 



$49.95 



To Order: 

1 ! Mall or phone orders accepted 

2j Check. COD. VISA or HflC lincltide exp. 

date and signature) 
3) Add $150 US. shipping 
4] Add S5 00 foreign 
51 Specily 64K or 128K Apple when 

ordering RAM DRIVE 



Easy to use documentation 
All disks copyable, catalogahle. 
Dealer inquiries welcome. 
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Some Inspiring Words 

I am writing for a few reasons. Firs! 
of all, I want to thank you for publish- 
ing so many articles on how to softkey 
disks. Even though I don't need to 
backup many of them, I still enjoy 
teaming new tricks about the Apple. I 
wish there had been more new pro- 
grams (i.e. more than zero) in no. 5, 
but I can't complain. 

I would like to get one small bit of in- 
formation from you: the address of 
A.P.P.L.E. (Apple Pugetsound Pro- 
gram Library Exchange). It was men- 
tioned in a letter by Thomas E. Militello 
(pg. 4} and I've heard of it before, but 
can't seem to find the address any- 
where. Even though I live in the same 
town as the inventor of Wizardry, there 
doesn't seem to be any Apple users 
group around, which means I'm fairty 
isolated. 

An article I would love to see is one 
which would list a skeleton library of 
books on the Apple, Just a list of what 
books you have found most useful for 
BASIC, assembler, graphics, etc. I per- 
sonally like the McGraw-Hill/Osborne 
book on Apple ][ BASIC, but have no 
idea what books are good for machine 
language. What book(s) are good on 
DOS layout, on the monitor, and on 
machine architecture would also be 
wonderful to know. I'd also love to see 
a simple list of what software tools peo- 
ple have found useful/essential for pro- 
gram development. Through talking 
with people, I have found out about 
GPLE now sold Beagle Bros. 1 wish 1 
had known about this software months 
ago; it would have saved a lot of pain- 
ful editing. Right now, I'd like to get a 
macro assembler, but have no idea 
where to go to took for a comparison 
of what's available. A tittle known book 
that I'd like to recommend is "Apple 
Graphics & Arcade Game Design" by 
Jeffrey Stanton, The Book Company. 
It's far and away the best book I've 
seen on the subject; linlike 95% of all 
other Apple graphics books, which 
may devote their last chapter to shape 
tables, this book gets into a lot of tech- 
niques mentioned in Hardcore COM- 
PUTIST. After a third of the book, 
you're past shape tables and getting 
into machine language coding. Chap- 
ters cover hi-res screen architecture, 
bit-mapping, and arcade techniques 



such as page-flipping, steering and fir- 
ing, collisions, explosions, and scroll- 
ing. The whole book centers around 
making a Defender-like arcade game 
(which is left unfinished as an "exer- 
cise for the reader"). The book is 288 
pages with very little space wasted and 
a lot of usable assembly language 
routines. 

You've probably seen "Enhancing 
Your Apple ][, Vol. 1", by Don Lan- 
caster, it's pretty interesting, but relies 
too heavily on hardware changes to 
get results. The enhancements are 
clever and cheap, but make software 
using them great for the hobbyist and 
that's all. His "Tearing into l\/lachine 
Code" chapter looks pretty good; in- 
teresting methods to figure out how 
someone else's clever code works. So 
far, the part I've most enjoyed is the 
introduction, where he says something 
that you might quote in Hardcore: 
"Undoing copy-protection is fun!" 
'Not only is it fun, but cracking the 
uncopyable is about the most 



challenging and rewarding thing that 
you can possibly do with your Apple. 
And, the things you learn along the 
way are exactly the skills that you will 
need to become a really great 
programmer." 
Inspiring words indeedl 

Eric Haines 
Ithaca NY 

Mr. Haines: The address of Call 
A.P.P.L.E. is: 

21246 68th Ave. S. 

Kent, WA 98032 

Phone (206) 872-2245 

Books we have found useful include: 

Beneath Apple DOS 

By Don Worth and Peter Lechner 
Quality Software 

What's Where in the Apple 

l^icro Ink 

Using 6502 Assembly Language 

By Randy Hyde 



Know where your head is, at all times, 
with IRAK STAR constant digital readout 




• Saves copying time 

• For nibble programs 

-I- WorVs with nibble copy ptogrcims to aispioy 
tTOcks ana haH-trock s thot the progfom accesses. 

+ Operates witti any Apple" -compatible program 
4- Save llnne by copying only 1 tie tracks e«Fng used 

4-Dispioysupto30tracksandtialt'tracks; 

compatible v/llti riigh den^ty drives 
-(- K copied program doesn't tun . Irak Star disptoys 

tracl< to be recopied. 
+ Compat:t si2e. permtts- plocamenl on top oi 

disl< drive 
+ Does nol use □ siot in tiie Apple* computer 
+ For Apple' |i. 11+ and lis 
Apple is a ^egl^ler&d trademar*; OI Apple Computer Inc 



FREE INTRODUCTORY 
BONUS 



wiiti pufciiose 
of Irak Star 



• Trak Stai disk contains patching 
software. 

• Simptetooperate, menu-driven 
Irak Stcir software automaficolly 
repairs a bad track wtttiout 
requiring tectintcal expertise. 



Midwest 



Ptione913 676-7243 



vMNS. 



Pius $3 sllipping 
^■d r-iandiin^ charge 

Foreign airmiJI & handling $6.00. 

Adopter required (or 2 -drive svEterro S12 

Documentcation only S3 

Refundable witti putctiose of Trak Sior 

Personal ctwcl<s, M Q. 

Visa ond tilosfercajd 

Microsystems 

9071 MelcaK / Suit© 124 

Overland Park. KS 66212 
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Most Wanted List 

We were ovemhelmed with the number of Soft- 
keys that were recently submitted to us for Sensi- 
ble Software's "Sensible Speller" and Sir Tech's 
"Legac)' of Llylganiyn." We would like to thank 
all of (he people who responded to the input column 
of Hardcore COMPUTIST No. 6. 

This has prompted us to regularly print a list 
of the most wanted softkeys. If there is a program 
that you have just been pulling your hair out over 
backing it up, let us know about it. Send your vote 
for the most wanted softkey to: 

Hwdcore COMPUTIST 

Wanted List 

P.O. Box 44549 

Tacoma, WA 98444 

Below is the first list. If you know how to de- 
protect, unlock or modify any of these programs, 
we encourage you to help other Hardcore COM- 
PUTIST readers and earn some extra money at 
the same time. Be sure to send the information to 
us in article form on a DOS 3.3 diskette. For a 
complete format description, ask for our Writers 
guide. 

1 . Baak Street Writer 
Broderbund 

2. ¥¥% FUe / PFS Report 

Software Publishing Corp. 

3. Zoom Graphics 
Phoenix Software 

4. Flight Stmulslor H 

Sub Logic 

5. Type Attacb 

Sirius Software 

fi. DB Master 4.0 
Stoneware, Inc. 

7. Ultima III 

Origin Systems 

i. One 00 One 

Electronic Arts 

9, Visiblend 
Micro Lab 

10. The AccouDtant 

Decision Support Software 



Likewise, programs we would hate 
to be without include: 

Bag of Tricks 

Quality Software 
$39.95 

Copy 11+ version 4.0 or above 
Central Point Software 
$39.95 

Global Program Line Editor {GPLE) 

Beagle Brothers 
$49.95 

The CIA 

Golden Delicious Software 
$65.0© 

The S'C A/lacro Assembler 

S-C Software 
$92.50 

/n addition to your recommendations 
we might add that all of Don Worth's 
other books (Micro Cookbool<, The 
Hexadecimal Chronicles, The Incredi- 
ble Secret Money Machine, etc) are 
aiso very good. 

More on Screenwriter 

I have had three different Screen- 
writer disks crash. A backup was pur- 
chased after the first crash. As a result 
of subsequent changes, I now possess 
one 2.0 version and one 2.2 version. 
I was excited when I saw the article 
("Screenwriter il Softkey By Daniel 
Price in Hardcore COMPUTIST #5), 
and promptly verified the procedure on 
the 2.® version. The 2.2 version could 
not be copied because it does not use 
the same file names. Furthermore, a 
portion of the catalog is unlistable. 

The latter part of the article made 
reference to increasing the speed of 
booting Screenwriter It through the use 
of "Bag Of Tricks". For what it is 
worth, the 2.0 version boots from the 
menu in 14 seconds. 

The faster booting rate of the 2.2 
version is a distinct advantage and I 
would be very interested in seeing a 
comparable article entitled "Screen- 
writer II, Version 2.2, Softkey By 
Whoever Knows How", 

Neil E, Walter 
Hockville MD 

Mr. Waiter: Shortly after the softkey for 

Screenwriter 2.0 appeared in Hardcore 

COMPUTIST no. 5, one of our readers 

called and recommended the following 

procedure for backing up Screenwriter 

2.2 

1) Use COPY A to copy the disk. 

J 2) Use some sort of disk scan utility 



(The Inspector, ZAP from Bag of Tricks, 
or The Tracer on The CIA disk) to 
search for a byte sequence of 20 00 7F. 

3) This sequence should be found on 
track $0F, sector $07. 

4) Change these bytes to EA EA EA 
and write the sector back to the disk. 

We don 't have Screenwriter 2.2 to try 
this out on, so please let us know 
whether or not this procedure works for 
you. 



Egbugs 

Thanks to Dr. Goldstein for his arti- 
cle "Cracking The Egbert II Commu- 
nications Disk". I have already 
thanked you by sending more money. 

However, ttiere are a few errors 
(maybe mine). I did not use the infor- 
mation on DeMuffin Plus since I al- 
ready had it. Between steps 6 and 7 
(page 17) you need to add a step, 
•86O0G. On page 1 8, chec;k the name 
of your Combo Program. Mine was 
10-83. Also, the value at *54BC was 
AB. I changed it to 2(9 as the article 
suggested. 

On page 19 in the RTTY and ECW 
program, you should not use the 
reserved word. Use "A" only. My 
RTTY program does not receive cor- 
rectly. It prints at an angle going up the 
screen. I'm still looking for this. Can 
anyone help? 

Also, can anyone unlock Zoom 
Graphics? 

Jim Willis West 
Monroe LA 

Mr. Willis:Unfortunately you are right; 
we did manage to introduce some bugs 
into Dr. Goldstein's softkey. Please see 
the corrections printed on page 30 of 
this issue. 

We have amputated the toes of the 
person responsible for these bugs. 

Hit List 

Following are some ideas and 
thoughts regarding your publication: 

it seems as though your two maga- 
zines are starting to appear on a more 
regular basis. This would seem to in- 
dicate that hopefully, we are over the 
hump and you are here to stay! Con- 
gratulations! 

Also, the softkey articles in the latest 
issue seem to be more tutorial and 
step-by-step, so that those of us who 

Continued on page 28 
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BEADEBS' SOFTHEV & COPV EXCHANGE 



^1 



Backincf-Vp Crush, 
Crumble St Chomp 

By leff Rivett 



Crush, Crumble, and Chomp 
Automated Simulations (Epyx) 
28035 Dorothy Drive 
Agoura, CA 91301 

Requirements: 

Apple II Plus or compatible 
Replay 11 card and utility disk with 
SOFTMOVE program 
Crush, Crumble, and Chomp (Epyx) 
An initialized DOS 3.3 disk with "HEL- 
LO" as the boot program 
FID program from 3.3 System Master 
disk 

Crush, Crumble, and Chomp is 
copy -protected only on areas of the 
disk that contain the two main Ap- 
plesoft programs. The rest of the fties, 
and there are a few of them, can be 
transferred to a copy disk using any file 
transfer program. 

The main (copy-protected) files are 
called: 

C=™LNCCMAIN 

Run FID (or any other file transfer 
program) and copy all the files, except 
the two copy-protected ones, from the 
original to the blank initialized disk. 

BRUN FID 

After transferring the unprotected 
files to your initialized copy disk, boot 
the original Crush, Crumble and 
Chomp disk 

PR#6 

Make a REPLAY copy at the point 
where the set-up program starts and 
asks you the question "DO YOU 
WANT TO CONTINUE A SAVED 
GAME?". 

Now, run "SOFTMOVE" from the 
Replay II utility disk. "SOFTMOVE" 
assumes that there was an Applesoft 
program in memory when you pusfied 
the Replay button to make the copy. 
This Applesoft program is put back into 
memory intact, with a normal DOS 
resident instead of the copy-protected 
DOS. 

You can now save the Applesoft file 
to the disk that contains all the files you 



have transferred. Save it with the 
name "O^^^NCC," 

SAVE C™NCC 

Boot the original again. This time let 
the set-up progress to the point where 
the play actually starts and then make 
another REPLAY copy. Repeat the 
"SOFTMOVE" procedure you used 
previously on the first protected pro- 
gram. Save this file as 
CCTflL NCCMAIN. 

SAVE C^^f'^NCCMAIN 

That's ail there is to it. These files 
can now be modified at will. 

A last note: the "SOFTMOVE" pro- 
gram is a surprisingly useful utility. For 
instance, if you typed in a huge Ap- 
plesoft program and forgot that there 
was no DOS in the machine, you might 
want to shoot yourself. With REPLAY 
II and "SOFTMOVE" you can make a 
REPLAY copy and have the file on disk 
in no time, almost as if DOS was in the 
machine all along. 



Backing-Vp Snake Byte 
By Clay Harrell 

Snake Byte 
Sirius Software, Inc. 
10364 Rockingham Drive 
Sacramento, CA 95827 

Requirements: 

48K Apple, with old monitor F8 ROM 
One disk drive, with DOS 3.3 
Initialized 48K slave DOS 3,3 disk 
Snake Byte 

Snake Byte is a challenging game 
that requires a great deal of eye-hand 
coordination. But it is a lot of fun, and 
so is its deprotection! 

In typical Sirius tradition, the disk is 
protected so that nibble copies are 
relatively difficult to make. But, there 
is another way! Snake Byte is not a 
very big program and to confirm this, 
Sirius has helped us out a great deal. 

After booting the game and resetting 
into the monitor, the text page is co- 
vered with what appears to be the low- 
res version of the game. The author 
uses the text page for animation 
duties, so we know that we do not have 
to save that portion of memory 
($480-800). 

If we list memory from $800 to 
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$1800, we find it all zeroes. Obvious- 
ly, we do not have to save this since 
there is no vatid code, there. Thanks 
Sirius! 

Strolling down memory lane, we 
come to $8600 and notice the same 
phenomenon again! Sirius has 
blanked out memory from $8680 up to 
RWTS {which we don't need to save 
since no disk access is ever encoun- 
tered after the game finishes its initial 
load). It is now obvious that we need 
to save $1808 to $85FF. 

The question of the day then, is: why 
did Sirius/the author do this? 

Anyway, figuring out what code to 
save was easy. 

Now, where does the game start? 
Checking all the standard starting lo- 
cations ($1800, $6000, etc.), nothing 
comes up. But if you are cunning 
and/or lucky, like me, you will find that 
$7697 seems to be the start of the 
game. 

We now have all the information we 
need to deprotect Snake Byte, 

Note that we really do not have to 



FOR SERIOUS COLLECTORS 

CoinMasstore 

StampMass tore 

Masstore Collector 

For Apple* II, II+, He and compatibles 
DOS 3.3 - 4SK RAM - 1 Disk Drive 

The "Masstore" series tor Coin Collei-ling, Stamp 
Collecting and General Collectflbles (i.e. baseball 
cards, etc) provides a quick, convenient and 
efficient way to manage colleetions. These user 
friendly, menu driven pLfogracns require no addi- 
tjonal programminsj. Features include: 

• Store and sort coileciions by daie/mlnt mark. Scott 
number, denomination, country, etc. 

• User definable printouts. 

• Want, Inventory. Evaluation & Price bat*. 

• 14 "condition/ grade b" for each collectable. 

• Automatic Insert, Delete. Revise and Find modes. 

• Up to 100 collEctionfi per tnaater disk— copyable 
for additional collections, 

• SnmmariKea total collection valuer 

• Reference values easily changed. 

• Complete with sample collections. 

• SlampMasstore & Masstore Collector complete 
viitU printable oit-disk tutorials. 

In Addition CoinMasstore also: 

• Estimates and displays reference values, for up tp 
SI coin grades (Filler- 1 to M&.70, Proof-60 to 
Proof- 70). 

• Calculates and prints out bullion values 

• Includes detailed step-by- step manual. 

• Includes sample Lincoln Cent data base, 

StampMaeetare & Masstore Collector ■ S49ea, 
Any two ■ SSS All three -$127 

\Ca\[L nr&idencE sdd fj>" aal&ti taJ^^ 

Send check or money order to: 

SoftShoe Enterprises 

1D9S9 Kids Avtnut. Suite ZO? 
tNlilltlBr. Caliloniia 9DE04 

Phou: Z)3-9U-S541 

*Appla It/n-^/Utregtsiered trademarkij^f Apple ffunputdrilffi:. 
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save hi-res page one, since it is drawn 
on. For convenience' sal<e, inowever, 
we will. 

Here's the exact procedure for the 
deprotection of Snake Byte: 

1) Boot the Snake Byte disk 
PR#6 

2) After the drive stops, reset into the 
monitor. 

3) Boot a 48K slave disk 
PR#6 

4) Enter the monitor 
CALL-151 

5) Enter the following code which turns 
on hi-res page two and waits for a 
keypress 

17E9:AD 50 Cfl AD 52 Ca AD 57 CB 
AD 55 Ce AO 10 Cfl AD 00 C0 10 FB 
4C 97 76 

6) Save the program 
BSAVE SNAKE BYTE, 
A$17E9,L$6E19 



Snake Byte Modifications 

If you become totally frustrated with 
Snake Byte, here are some ways to 
beat the system. 

Create this Applesoft program that 
runs the game: 



10 

2a 



319 
40 



50 



60 
70 



POKE 1810,102: POKE 1011,213: POKE 
1012,112 
1FAO0THEN40 

HOME: PRIWT ^'AFTER SNAKE BYT 
E IS RUNNING PRESS RESET FOR 
MORE SNAKES OR FOR A DIFFE 
RENT STARTING LEVEL" 
A = 1: PRINT CHR$(4):"BRUN SNAKE BVTE" 
HOME: VTAB 8: INPUT '■HOW MAN 
Y SNAKES WOULD YOU LIKE?":SN$: SN 
= VAL(SN$}: IF SN > 2 
54 OR SN < 1 THEN 40 
VTAB 10: INPUT "WHAT STARTING 
LEVEL?";SL$: SL = VAL(SL$} 
: IF SL > 21 OR SL < 1 THEN 
50 
POKE 30382, SN 
POKE 30366,SL 
CALL 30359 



Undocumented Feature 

One last note on Snake Byte: 
Whenever the game asks: "HOW 
MANY PLUMBS?" you can touch the 
"C" key to change the keys used to 
direct the snake. Have fun! 
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Softkey For DB Master 

By Dan Lui 

DB Master 
Stoneware, Inc. 
50 Belvedere St. 
San Rafael, CA 94901 

Requirements: 

Apple II, with 48K 

One disk drive 

DB Master (old version) 

COPYA 

The Inspector, or similar program 

One blank disk 

The old version of DB (Data Base) 
Master is protected very well. The disk 
contains three different protection 
schemes. 

First, it uses half tracks from 
$6.5-$22.5. Second, the closing ad- 
dress and data marks have been 
changed from the normal DOS 3.3 
$DE/$AA to $DF/$AA. Third, there is 
a nibble-like checking routine to check 
track 0. 

Breaking the nibble-count scheme is 
the most difficult task of all. 

The following procedure will unlock 
this program. It also works for DB's 
Utilities disk: 

1) Put in the System Master and type: 
LOAD COPYA 

2) Add the following lines to COPYA: 



199 
248 
259 
400 



405 



410 



420 



425 



GOSUB 400 

GOSUB 420 

GOSUB 420 

POKE 47413,223: POKE 47423,1 

71: POKE 47505,223: POKE 475 

15,171 

POKE 48351,201: POKE 48352,1 

2: POKE 48353,106: POKE 4835 

4,0: POKE 48355,24: POKE 483 

56,76; POKE 48357,107: POKE 

48358,190 

POKE 48741,223: POKE 48742,1 

88: RETURN 

POKE 48741,107: POKE 48742,1 

90: POKE 47413,222: POKE 474 

23,170: POKE 47505,222: POKE 

47515,170 

POKE 48741,167: POKE 48742,1 

90: RETURN 



3) Save the new COPYA in case of 
errors. 

SAVE COPYADB 

4) Execute the program 
RUN 

5) After the disk has been copied, use 
the Inspector, or some other sector 
editor to read and modify the following 
sectors: 



Trk 


Set 


Byte 


From 


To 





3 


$35 


DF 


DE 





3 


$3F 


AB 


AA 





3 


$91 


DF 


DE 





3 


$9B 


AB 


AA 





E 


$0A 


A2 


D0 





E 


$08 


m 


12 


1 


F 


$C7 


A9 


60 


3 


1 


$3E 


20 


60 



6) Write-protect disk before running. 

The above procedure eliminates all 
three of the protection schemes Stone- 
ware provided on the older version of 
the excellent DB Master. 

Backing-Up 
Mouskattack 

By Clay Harrell 

Mouskattack 
On Line Systems 
36575 Mudge Ranch Rd 
Coarsegoald, CA 93614 

Requirements: 

48K Apple 

One disk drive, with DOS 3.3 

DOS 3.3 System Master 

Mouskattack 

One blank, initialized 48K slave disk 

Although Mouskattack is a rather old 
and not so thrilling maze game, it war- 
rants discussion on deprotection 
methods and the use of DOS from pro- 
tected programs. 

Upon booting the Mouskattack disk, 
the prompt appears on the lower left 
side of the screen, indicating that a 
somewhat normal DOS is used by the 
program. 

if you boot a normal DOS 3.3 disk, 
then put your Mouskattack disk in the 
drive and type CATALOG, a director 
does appear. You will not see any files, 
just copyright notices and names of the 
authors involved. 

These, however, are files in the 
directory. 

The disk seems almost unprotected 
and to confirm this, I made a copy with 
COPYA from the DOS 3.3 System 
Master. It reads the non-DOS tracks 
slowly. This is due to the sector skew- 
ing used by On-Line in hopes of a 
faster loading game and not due to the 
protection. However, the people at On- 
Line were not too successful in carry- 
ing out their intention and we shall see 
why, in a moment. 

The first three tracks {the DOS 
tracks) read at the normal speed be- 
cause they are normal DOS, Just like 
those in your DOS 3.3 System Master. 

After making my COPYA copy, I 
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used a Disk Editor to read in track 1 1 , sector F, of the disk. 
This is the lirst sector of the catalog track. 

On-Line was able to make the directory appear without 
file types and sector lengths using a simple technique. The 
first seven (or six) characters in the directory name are back 
spaces. Starting with byte $0E, change the first seven 
characters to anything but control characters, numbers or 
spaces, and you can load and examine the files like any 
other DOS 3.3 files. 

Don't bother with the other file names, though. They are 
all blank files. The only one we are Interested in is the first 
directory entry, MOUSKATTACK. 

Snooping Through 

Now, get back into BASIC and catalog the copy of 
Mouskattack. Ttie first entry of your catalog should have 
a binary file, four sectors in length, called c™l|-|cthl|-|cthl|-|o- 
TRI.HCTFLHCTRLHCTRLH MOUSKATTACK. You can now BLOAD 
this file and snoop through it. 

At this, point you might ask how I knew to do this. Since 
Mouskattack has a normal DOS on it, by loading in track 
one, sector 9, with a sector editor, you can see which file 
is the boot file or Hello program. 

Sure enough, Mouskattack is preceeded by seven 
cthlh's (i.e., backspaces). Therefore, you know that 
Mouskattack is the first file you should snoop through. 

Now, to find out where this file is loaded, BLOAD the file 
cTf.i.|-|cTRL|-|cTRi. HCTHLHCTRi. HCTRL mcTfluH ^ Q [J SKATTAC K , ontef 

the monitor and examine locations AA72.AA73. 

Continued on page 30 



Input/Output Made Easy! 

The j:/D-!000™ I/O System for Apple II* simplifies 
computer control. Software support allows control of alt 
inputs and outputs using simple BASIC variable names. 
System includes two boards shown, cables, 60-page 
manual and disk. 

Special Introductory price S29Vb 




User Interface Module 

1 4 Analog tnput Generators 

2 8 Digital Input Switches 

3 8 DtgiBI Output Indicators 

4 Uses 9-V Battery No External 
Power Required 

5 Jacks to User Circuits 

6 Parallel Jack to Corriputer 




Appte Interface Board 

1 Adjustable Reference 

2 8 Channel A/D 

3 8 Analog Inputs 

4 B Digital Inputs 

5 S Buffered Digital Outputs 

6 Gold Plated Connector Plugs 
into Ifcur Apple 

y Digital Buffer 

8 Peripheral Interface Adapter 



wf^fTryfym^fiR^P^rf7R''P^ 



TM 



/ Innovative MIcrocomputerEnhancetnentSystems 

4860 East 34 Sth Street • Willoughpy, Ohio 44094 • |2i6) 9S3-S4I4 

*Af4jle II li ^ registered ti^Oerr^rii of Apple Computer Inc I 



Complete, Commented Source Code! 

Our software is not only unlocked and fullv copvable , 

...we often provi'de Ifie complete source code on disk, at unbelievable prices! 



S-C Macro Assembler. The key to unlock! tjg ail the 
mysteries of machine language. Combined editor/ 
assembler witii 29 commands. 20 directivt;s. Macros, 
conditional assembly, global replace, edit, and more. 
Highest rating "The Book of Apple Software" in 1983 
and 1984. $00. 

Powerful cross-assembler modules also available to 
owners of S-C Macro Assembler, You can develop soft- 
ware on your Apple tor OBOO, 6a05, E5809, 68000, 8085. 
8048, 8051, 1802. LSI-11, and Z-«a microprocessors. 
$50 each. 

S-CXref. A support program which works with the S-C 
Macro Assembler to generate an alphabetized listing of 
all labels in a source file, showing with each label thf; 
the line nttmber where it is defined along with all line 
numbers containing references to the label. You gel the 
complete source code for thi,s amazingly fa.^t program, 
on disk in formal for S-C Macro Assembler. $50. 

Full Screen Editor. Integrates with the built-in line- 
oriented editor in the S-C Macro Assembler to provide 
a powerful full-screen editor for your assembly lan- 
guage source files. Drivers for Videx. STH80, and Apple 
//e 80-column boards are included, as well as standard 
40-column version. Requires f54K RAM in your Apple. 
Complete source code on disk included. $50. 



S-C Docu-Mentor for Applesoft. Complete documenta- 
tion of Applesoft internals. Using your ROM Applesoft, 
produces ready-to-assembic source code with full 
labels and comments. Educational, entertaining, and 
extremely helpful. Requires S-C Macro Assembler and 
two disk drives. $50. 

S-C Word Processor. The one we use for manuals, 
letters, our monthly newsletter, and whatever, 40- 
columns only, requires lower-case display and shif tkey 
mod. Works with standard DOS text files, but at super 
fast [100 sectors in 7 seconds). No competition to 
WordStar, but you get complete source codel $50, 

Apple Assembly Line. Monthly newsletter published 
since October. 1980. for assembly language pro- 
grammers or those who would like to be Tutorial arti- 
cles, advanced techniques, handy utility programs, 
and commented listings of code in DOS. ProDOS, and 
the Apple ROMs. Helps you get the most out of your 
Apple! $18/year. 



S-C SOFTWARE CORPORATION 
2331 Gus Thomasson, Suite 125 
Dallas, TX 75228 (214) 324-2050 

Professional Apple Software Since 1976 

Visa. MasigrCarii, American EKpres^, COt) accepied 

^pai,! '^ 3 \'i::^^3'' 3' Apt-- Carrip-ie' in-: 
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By Clay Harrell 

Zaxxon 

Datasoft, Inc. 

16606 Schoenborn Street 

Sepulveda, CA 91348 

$39.95 

Requirements: 

48K Apple or Apple II Plus 
One disk drive and DOS 3.3 
COPYA from 3.3 System Master 
A sector editor such as Zap 
Two btank disks 
Original Zaxxon disk 

One of my favorite arcade games of 
all time is Zaxxon, The game was the 
first to use "true" three-dimensional 
graphic effects that played well. I've 
spent a great deal of time (and tokens) 
playing the game so naturally, when it 
was available for the Apple, I bought it. 

The only complaint I have about 
Zaxxon is that there are only three 
planes given for each game. The ar- 
cade Zaxxon I had always played had 
five. I felt cheatedl With this in mind, 
I decided to dig into the code that 
made Zaxxon fly. 

{Please note that there has been a 
new release of Zaxxon from Datasoft. 
This is the one I will be primariiy dis- 
cussing, although the same protection 
was used on both versions. You can 
tell if you have the new version be- 
cause it has an option to use the Mock- 
ingboard with it. If your Zaxxon boots 
and asks "Mockingboard in slot 4 
Y/N?," you have the new version. In 
addition, 1 have seen two different pro- 
tections used on the newer versions of 
Zaxxon. I witl give details on the 
deprotection of all versions, including 
the older version of the game). 
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Deprotecting Zaxxon 



card into page 8 ($8fflffl-8FF) of 
memory. After this, depending on the 
complexity of the protection, it is some- 
times difficult to understand what goes 
on in the rest of the toad. 

In a normal slave disk boot, there 
are three stages of a boot, starting with 
the code at $C6(M-C6FF in the disk 
controller card. This controller card 
code loads in track $8, sector $8, into 
$80O-$8FF, which, in turn, loads in 
track $©, sector $0 through sector $9, 
into $B6Mi-BFFF. This new code loads 
in track $C, sector $C through track $2, 
sector $4, into $9D(D©-$B5FF and final- 
ly your Hello program is run. In 
summary: 



The first thing to notice is the boot 
of Zaxxon. Listen to your disk drive as 
the game boots and you can hear the 
drive arm swing out to an outside track 
and then swing back in and read the 
game in. This is what is loosely known 
as a "nibble count" or a "checksum" 
routine. 

If a byte doesn't match the bench- 
mark like it should when the outside 
track is read, the game will clear 
memory and reboot. Usually, the only 
thing involved in deprotecting a pro- 
gram that isn't a single load and that 
has a "nibble count" is to find the rou- 
tine that does the check and jump 
around it. Usually, too, about the only 
way to find this routine is to (yech!) 
trace the boot. 

Boot Code Tracing 

Boot code tracing is a method of 
tracing how a program gets from your 
disk to memory, it does not magically 
happen all at once but in stages which 
we can trace and examine and, hope- 
fully, understand. Hence, the name 
"boot code tracing." 

The theory of boot code tracing sug- 
gests that you should follow the boot 
process one step at a time to see 
where it takes you, by altering the code 
to prevent it from running away from 
you. Yes, it is advisable that you un- 
derstand assembly language, since 
the code that boots the disk is, in many 
cases, intentionally misleading. 

This process is based upon the law 
that track zero, sector zero, must al- 
ways be read by the disk controller 



Stage Code 
# location 



Final 
location 



Jumps 
to 



$C600-C6FF 

1 $0801-08FF 

2 $B600-BFFF 



$0800-08FF 

$8600- BFFF $6700 

$9D00-B5FF RUM 



Now, in order to change the code in 



BACK-UP 

ALMOST 

ANYTHING! 

Products below, when used appropriately. 
either singly or together, will enable you to 
copy virtually all software for the relevant 
computer. The copy-products are intend- 
ed to be used for back-up purposes only! 
Products are Apple-compatible unless 
otherwise indicated. 



Locksmith 


75 


Crack-Shot 129 


Back-lt-Up 


49 


Snap-Shot Call 


NIbbles-Away 


59 


Wild-Card HE 115 


Watson 


39 


Inspector 45 


Copy 11 + 


35 


Copy II -i- (IBM PC} 35 



CONNECTICUT INFORMATION 
SERVICES 

2313 East IVIain Street 

Bridgeport, CT 06610 

203-579-0472 



TO ORDER: Use phone or mail. VISA, MC, Chezks & 
bank wires accepted. Add 4% for ship- 
ping, or S4, whichever is more. Conn, 
residents add 7.5% sales tax. 

Nol CB^tonsible lof tv[^ograptl^[:a^ errors Prices sijbjecl to change 
without notice. 
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I Sy Hackers 
i For Hackers 



I • ELITE BOARD DOWNLOADS 

i •CRACKING TIPS 

I •PHREAKING SECTION 

i •GAME CHEATS 

I -PARMS 

i •PROGRAMS 
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Subscribe Now! 



• INTERVIEWS 



Send 25 Bucks for a 1-Year Subscription to; 
THE BOOT LEGGER, 3310 Holland Loop Road, 
Cave Junction, Oregon 97523 



1 
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BOOT-LEGGER I 
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the boot so that it doesn't run away 
from us, we can either alter memory or 
alter (a copy of) the disk. 

Check Routines 

If you defeat the DOS (Disk Operat- 
ing System) error-checking routines, 
you can copy the Zaxxon disk with 
COPYA, Of course, it won't run be- 
cause of the "check" routine and be- 
cause of some of the other 
incompatibilities with normal DOS 3,3, 
but you can read and write to the copy 
easily. 

To defeat the error-checking, enter 
the monitor 
CALL- 151 



and type: 

B942:16 

Whenever DOS encounters an er- 
ror, it jumps to a routine at $B942 
which sets the carry bit and returns. 
The carry bit is a flag to DOS that there 
was an error and directs it to stop 
whatever it was doing. It then prints out 
a worthless message to the user. 

If you defeat this routine, you can 
fool DOS and read the entire Zaxxon 
disk. Then copy the disk and examine 
the data on it. So, put your DOS 3.3 
System Master in the drive and 
RUN COPYA 

When the prompt for source drive is 
asked, hit ^^f^Q j^jg ^jn break you 
into BASIC. Now, type the following: 
CALL-151 
3A1:18 
382:17 
35F:17 
SDOG 
70 
RUN 

This will make some changes to 



COPYA. OBJ® so that it ignores errors 
and only copies tracks $fl-$1 6. Line 78 
of the Applesoft part of COPYA is also 
deleted to prevent loading in COP- 
YA.OBJffl and writing over the change 
just made. Now, select the desired 
drives and copy Zaxxon. 

Note: Zaxxon only lives from track $0 
to track $16 (tracks $0-$13 on some 
versions). If COPYA tries to read an un- 
formatted track your drive will 
recalibrate ("grind' ) for every sector 
that the program tries to read. Do not 
Interrupt this process. After the copy is 
made, make another copy of the dupli- 
cate of Zaxxon, which you had just 
made. Label the first copy WORK ZAX 
and the second copy COPYA ZAX. 

Put these two copies aside for a mo- 
ment. The next step is to trace the 
boot. First, enter the monitor 
CALL-151 

and clear out memory with this 

command: 

800:0 N 801<8ee.95FFM 

To start the boot you need to run the 
code in the disk controller card, but we 
stop it before it runs away. You can- 
not change the code in ROM (Read 
Only Memory), but you can copy it 
down to RAM (Random Access 
Memory) and change it. Use the follow- 
ing command from monitor to do this: 
96efl<C600.C6FFM 

Having done this, you can change 
the boot code so that it loads in track 
$0, sector $8, but does not execute it. 
At location $96F8 you will see a JMP 
$8C1 . This starts the next boot process 
(refer to table). 

Next, change this to JMP $FF59, 
which wil) jump to the monitor. From 
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the monitor, type: 
96F8:4C 59 FF 

Now, put the WORK ZAX disk in 
drive one and execute the code with: 
9600G 

The drive will spin, the Apple will beep 
and you will see the "•"prompt. 

From the table, you can see that this 
code is loaded into $8®1 . (To stop the 
drive from spinning, enter CflE8 from 
the monitor. Also, to turn off the hi-res 
page, enter C054 and C051). Hovj, ex- 
amine the code at $801 with the 
command: 
801 L 



Upon examining 


the code, you will 


find that it is 


fairly 


normal. 


with some 


exceptions: 








0801- 


A5 27 


LDA 


$27 


1 ,. 


0803- 


C9 09 


CMP 


#S09 




0805- 


□0 18 


BNE 


$081F 




0807- 


A5ZB 


LDA 


S2B 


1 N 


0803- 


4A 


LSR 






OBOA- 


4A 


LSR 




1 


080B- 


4A 


LSR 






080C- 


4A 


LSR 




i R 


080D- 


09 CO 


ORA 


#$co 




080F- 


B5 3F 


STA 


S3F 


i M 


0811- 


A9 5C 


LDA 


«$5C 




0813- 


85 3E 


STA 


S3E 


! A 


0815- 


18 


CLC 






0816- 


AD FE 08 


LDA 


SOeFE 


! L 


0819- 


6OFF08 


ADC 


$08FF 




081C- 


BDFEOB 


STA 


$08FE 




oeiF- 


AE FF 08 


LDX 


$08FF 




0822- 


3015 


BMI 


$0839 


' D 


0824- 


BD 4D 08 


LDA 


S084D,X 




0827- 


85 3D 


STA 


$3D 


1 


0329- 


CE f F 08 


DEC 


SOBFF 




082C- 


ADFEOS 


LDA 


$08FE 


! S 


082F- 


85 27 


STA 


S27 




0B31- 


CEFEOB 


DEC 


$08FE 




0834- 


A6 2B 


LDX 


$2B 




0B36- 


6C3E00 


JMP 


($003E) 




0339- 


EE FE 08 


INC 


$08FE 




083C- 


AD 55 CO 


LDA 


$C055 


1TURN ON 


083F- 


AD 50 CO 


LDA 


$C050 


IHI-RES2 


0842- 


AD 57 CO 


LDA 


SC057 




0B45- 


A2 70 


LDX 


#S7D 


!??7??7? 


0847- 


9A 


TXS 




!??????? 


0848- 


4C84 08 


JMP 


S0BB4 
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08B4- 
OSBS- 
08B3- 
OBBB- 
06BD- 
08CO- 



A9 20 
85 13 
AD 5S CO 
A9 60 
8D06 07 
6CF8 0B 



LDA 
STA 
LDA 
LDA 
STA 
MP 



#$20 

S1B 

KOSJ 

#$60 
S706 
(SOeFD) 



and the code will look like this: 



'JUMP TO 
!$800a 



How it Works 

The first part of the code, trom $881 
to $83B, is lifted verbatim from a DOS 
3.3 Slave disk. This code loads in track 
$0, sector $©, through track $0, sector 
$©9, into $7F(W!)-$88FF. This is rev- 
ealed from location $8FE, which is one 
higher than the first page loaded into. 
The byte at $8FF is one less than the 
number of sectors to be loaded. 

The next piece of code turns on the 
hi-res screen. The last part of code, be- 
fore the jump to $8B4, looks innocent, 
but really isn't. It loads the X-register 
with $7D and transfers it to the stack 
pointer. 

To understand the implications of 
this, you must understand how the 
computer keeps track of its return po- 
sition after an RTS (Return from Sub- 
routine). 

When the 6502 encounters a JSR 
(Jump to Sub-Routine), it stores the 
present address on the stack so it 
knows where to return when an RTS 
is encountered. 

This can be used to obscure code 
from unwanted eyes. For example, say 
we want to go to $9600. You can load 
the stack with $95 and then $FF, by us- 
ing the PHA op-code (Push Accumu- 
lator on Stack). When an RTS is 
encountered, the two last bytes are 
pulled from the stack, incremented by 
one (to $9600), and jumped to. 

Alternatively, you can change where 
the pointer on the stack is pointing to 
and make it point to the desired loca- 
tion. Keep this in mind when you find 
an RTS. 

At $8B4, a few zero page locations 
are loaded and then there is an indirect 
jump to $8000 (through $8FD). To see 
the code at $8IB00 load the next stage 
of the boot but stop it before it can ex- 
ecute. To do this, run your sector edi- 
tor and change track $0, sector $0, 
byte $C0, to 4C 59 FF on the disk la- 
beled WORK ZAX. 

This will jump you to the monitor be- 
fore it can execute the code at $8000. 
Now, write the sector back out to the 
disk and boot the disk. After a moment 
the computer will beep and stop in the 
monitor. You can now examine the 
code at $8000. Do this with the 
command: 
SSflflL 
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BODO- 
8Q02- 
8004- 
8005- 
8008- 
80DB- 
800E- 
8011- 
S012. 
6014- 
8015- 
8017- 



A0D9 
A2 00 
BA 
EE 00 80 

EE10 80 

BD 19 7F 

9O7E00 

CA 

D0F9 

88 

DOEE 

60 



LOV #S09 

LDK #S00 

TXA 

INC iBOOD 

INC SBOIO 

LDA $7F18,X 

STA S007E,X 

DEX 

BNE S3O0B 

DEV 

BNE SB005 

RTS 



I 

I M 
I E M 
! M 
I V 
!R E 

ly 

I 

i 

[JUMP 
ITHRU 
[STACK 



Notice the RTS at $80t7. Remem- 
ber: you jumped (JMP), not jumped 
sub-routine (JSR) to all the routines, so 
there is nothing on the stack to return 
to! 

Well, yes there is! The memory 
move relocates the memory at $7F19 
through $8718, down to $7F through 
$087E, This moves memory across 
page $1, which is the stack! 

Remember too, that the stack 
pointer is set to $70 in Booti . After the 
memory move, an RTS is executed. 
The stack is pointing at $17D, which 
is now $07 and $65 after the memory 
move. This will be the next jump (pius 
one) for the final stage of the boot! 

The manufacturer, Datasoft. has ad- 
ded a final bit of protection in that the 
next jump is across the text page 
which, of course, changes when you 
exit the program in any manner. But 
you can simply move memory to, say, 
$107E and examine it to see what the 
next load does. 

To do this, change $8010 to 10 and 
execute the memory move. Do this as 
follows: 

8010:10 N eeeoG 

Now, $1766 is equivalent to $766. 
So type: 
1766L 

and examine the code. It should look 
as follows: 



1766- 


A5 28 


LDA 


$2B 




1768- 


80 OE 02 


STA 


$OEOE 


G C 


1768- 


A9 20 


LDA 


#$20 





176D- 


EA 


NOP 




D 


176E- 


A6 2a 


LDX 


S2B 


D E 


1770- 


20 1F02 


JSR 


S021F 




1773- 


AG 20 


U3Y 


#$20 


NIBBLE 
COUNT/ 
CHECK 


17D4- 


A9 16 


LOA 


#S16 


G C 


17D6- 


30 n Qi 


STA 


$0211 





17D9- 


A9 00 


LDA 


#$D0 


D 


17DB- 


8D16 02 


STA 


$0216 


E 


170E- 


C9A01 


JMP 


$019A 





If you take time to look at this code 
you will find that the offending ' 'nibble 
count" or "checksum" starts at $1773 



and goes to $17D3! This is all you 
need to know to defeat it. 

What you have to do, next, is jump 
around this. Do it by typing: 
1773:4C D4 07 

The other loads and stores of the ac- 
cumulator are parameters for their 
loader. For further understanding, here 
are the parameters: 

$211-high track # to start from, 
$212-high sector # to start from. 
$21E-# of pages {sectors} to load. 
$21B-starting page to load at. 
JSR $1E9-start the load. 

The last thing to do is to find the 
"nibble count" code on the disk code 
and change it. Most good sector edi- 
tors (like The Inspector) have LOCATE 
routines enabling you to find a pattern 
of bytes on a disk. 

One final note: Now that you know 
where the check routine lives, we can 
defeat it. But you also must change the 
epilog bytes to normal DOS 3.3. 

Datasoft uses $CC for their epilog 
bytes where normal DOS uses $DE. If 
you are familiar with loaders and 
RWTS, you can find it in their loader. 
The table is on page $4 (page $14). 

Stepwise 

With this information in hand, here 
is a step-by-step procedure for the 
deprotection of Zaxxon (Mockingboard 
version only): 

1) Get out your DOS 3.3 System 
Master disk and run it 

RUN COPYA 

2) When COPYA asks for the slot num- 
ber of the original disk, stop the 
program 

ctblQ 

3) Enter the monitor 
CALL 151 

4} Patch DOS and COPY.OBJ0sothat 

they ignore read errors and only tracks 

$0-$16 are copied 

6942:18 

3A1:18 

382:17 

35F:17 

5) Re-enter Applesoft and delete line 
70 of COPYA so that COPY.OBJ0 is 
not reloaded 

SDQG 
70 

6) Run COPYA to copy Zaxxon 
RUN 

7) If you have two disk drives you can 
leave the room during the copy 
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process; otherwise, you may have to 
put up with your drive making some 
horrible grinding noises. Don't worry. 
This will not harm the disks or your 
drives. 

8) Run your sector editor and make the 
following changes depending on which 
version of Zaxxon you have. (Note: you 
may have to try all of these changes, 
depending on the release date of your 
Zaxxon. One of ttiem should work, 
though): 

For Mockingboard Versions 
of Zaxxon 

Trk Sect Byte From To 



$00 


$04 


$4F 


$CC 


$DE 


$00 


$04 


$50 


$D0 


$EA 


$00 


$04 


$51 


$AE 


$EA 


$00 


$07 


$0D 


$Afl 


$4C 


$00 


$07 


$0E 


$20 


$D4 


$00 


$07 


$0F 


$84 


$07 



For Mockingboard Versions 

of Zaxxon, for which the above 

method does not work 

Trk Sect Byte From To 

$00 $07 $00 $A9 $4C 

$00 $07 $01 $01 $Cfl 

$00 $07 $02 $4S $08 

$00 $04 $4F $CC $DE 

For the older non-IVIockingboard 
Versions of Zaxxon 

Trk Seel Byte From To 

$00 $07 $00 $Ag $4C 

$00 $07 $01 $01 $C0 

$00 $07 $02 $48 $08 

$00 $04 $4F $CC $DE 



9) Don't forget to write the sectors you 
have altered back to the deprotected 
Zaxxon disk. 

APT for Zaxxon 

As I said earlier, the Zaxxon in the 
arcades gives you five planes and our 
Zaxxon only three! If you want more 
planes, change byte $17 on track $®9, 
sector $08 with your sector editor to the 
number of planes you want (between 
$00 and $FF). I chose to change this 
byte to $©3, This gave me four planes, 
which is a nice compromise. This 
modification applies to all versions of 
Zaxxon, 
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The following Is a reasonably 
efficient procedure for backing- 
up certain protected disks that 
are not easily copied by either 
Locksmith 4.1 or Locksmith 5.0. 
The "rub" is that you must retain 
a certain portion of the copy pro- 
tection. That is, your copies can't 
be duplicated by Locksmith or 
other bit copy programs. 
However, it does provide a proce- 
dure for backing-up the disks as 
well as "liberating" them for 
study. 

Freeing the Disks 

STEP{1) First, you must have 
an APPLE II with 48K. It is espe- 
cially convenient if you have an 
old INTEGER card living in your 
APPLE, but if you don't, this 
procedure will still work on a 
number of protected commercial 
software programs. Let us as- 
sume that you have an old IN- 
TEGER card. I'll get back to 
APPLESOFT later. The switch on 
the INTEGER card should be 
down so that APPLESOFT is the 
boot-up language. What's this ? 
You say that you don't use your 
INTEGER card anymore be- 
cause you have an expansion card in 
slot 0? Well, clean that old INTEGER 
card off because, for our purposes, it 
will work in any slot which allows the 
switch to stick out of the back of the 
APPLE (slot 0, 2 or 4). 

STEP{2) Now, pull out the old DOS 

3.3 System Master and boot up your 

APPLE 

Pfl#6. 

Place a blank disk into the drive and 

INITialize it. 

INIT HELLO 

DELETE the "HELLO" program after 
you have INITJalized the disk. 

DELETE HELLO 

This slave disk will serve a very spe- 
cial purpose. Later, we will want to 
boot the system with it. Unlike a sys- 
tem master, when booting with a slave 
disk, much of the APPLE memory 
($4iM-$96W) is left undisturbed. 

STEP(3-a) Boot the protected disk 
and watch the screen very carefully 
during the boot process. If you see the 
APPLESOFT cursor for even a fraction 
of a second the chances are very good 
that this procedure will liberate the 
disk. Flip the INTEGER switch up af- 
ter the boot process is complete. Press 
RESET and you are instantly into the 
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Making Liberated Backups That Retain 
Their Copy-Protection By Thomas Dragon 



monitor. Note that you will always jump 
into the monitor no matter where the 
INTEGER card is located. This is 
another well kept APPLE secret. 

STEP(3-b) If you don't have an IN- 
TEGER card, make like Woody Wood- 
pecker on the RESET key until the disk 
drive stops. Then enter CALL -151, 
and you should be in the monitor. If the 
drive doesn't stop after 10 or 20 rapid 
RESETS, then this procedure won't 
work on your APPLE. You might want 
to see if there is some old-timer who 
might be willing to sell his useless old 
INTEGER card for $15 or $25. There 
are a number of old INTEGER cards 
around that appear not to work. Sur- 
prisingly, many of these old cards will 
still work in terms of forcing a jump to 
the monitor, if the old timer has one 
that doesn't work, just ask him if you 
can have it to study. 

STEP(4) Now that you are in the mo- 
nitor, type A56EG. This will activate 



the CATALOG function if the protect- 
ed disk has a reasonably intact DOS. 
You should then see a CATALOG of 
the disk contents. If you only get a 
"honking", then this procedure won't 
work. Don't despair. You will very sel- 
dom get a honking if you see the AP- 
PLESOFT prompt when you boot. 

STEP(5) Next, we will move part of 
the protected RWTS into an area of the 
APPLE memory that will remain intact 
during the boot process. In order to ac- 
complish this, we will use the monitor 
memory move. Enter 

48e0<B8ee.BFFFM 

This will move the special DOS rou- 
tines to $4800. 



STEP(6) Remove the protected disk 
from the drive and replace it with the 
slave disk that you previously initial- 
ized. 
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Flip the INTEGER card switch down if you are using an IN- 
TEGER card and boot the slave disk by typing e"""-? {as- 
suming slot 6 is the boot slot). Don't worry about the "FILE 
NOT FOUND" error. At this point, I am always extra cau- 
tious because I don't want to accidentally lose the protect- 
ed DOS information. Take out any disk with a bit of space 
on it and enter the following command from the keyboard 
BSAVE PROTECTED DOS, 

A$48ee,L$8e0 

STEP(7) Place the System Master into the drive and 
enter BLOAD FID. Everyone reading this little note must 
know about FID. If you don't, let me just say that it is a DOS- 
less copy program. It does not carry its own DOS like most 
other variations of APPLE copy routines, but "sucks" up the 
DOS that is living in memory when it is activated. However, 
we have not activated FID. We have only loaded it into 
memory. 

STEP(8) It is now time to move the protected DOS back 
into the regular DOS 3.3 memory area. Enter CALL -151 
to get into the monitor. Then enter 

B8e0<48e0.4FFFM 

Now you have modified DOS 3.3. The modified DOS is 
neither regular DOS 3.3 nor the true protected DOS. It is 
a hybrid of regular DOS 3.3 that employs the protection 
scheme that is on the protected disk. 

STEP{9-a) Return to Applesoft by typing '^'^C. Now 
INITialize a slave disk by typing INIT HELLO. If all has gone 
well, the slave disk will now become a slave disk thai re- 
tains the copy-protection of the original protected disk. Be 
sure to DELETE HELLO after the drive stops. 

STEP(9-b) If you have made an error in moving DOS, 
just re-boot the slave disk and then go back to STEP (7). 
If you have somehow managed to destroy the memory im- 
age, re-boot the system and BLOAD PROTECTED DOS 
as saved in STEP (6) and then go to STEP (7). 

STEP(18) The final step is to activate FID. You have 
the protected disk and you have a blank disk with the same 
DOS. Either enter CALL 2951 or CALL -151 8030. Either 
CALL will essentially activate FID and allow it to use the 
protected DOS. 

STEP(1 1) From this point, you should be able to trans- 
fer the files from the protected disk to your special slave 
with the use of FID. 

The programs are now essentially liberated from the point 
of view that they can be listed, modified and saved. It may 
be that the protected "HELLO" program sets the RESET 
vector when it is run. If you wish to study the programs, 
simply load and look at them. To be sure, you should place 
a write-protect notch on your copied disk if the original copy 
was write-protected. The disks are still protected in the 
sense that any copy procedures that failed with the origi- 
nal disk will also fail with the liberated disk. 

This procedure works well with the Microzine disks, the 
Videx pre-boot disks. Micro Power and Light disks, HIRES 
Secrets from Avant Garde, and an incredible codection of 
other disks that have either binary or APPLESOFT pro- 
grams on them. Disks on which the procedure doesn't work 
include the Human Systems Dynamics (HSD) disks and E- 
Z Draw. It doesn't work for E-2 Draw because the E-Z Draw 
disk uses a 32K DOS and this discussion deals with a 48K 
DOS. It doesn't work for the HSD disks because they have*^ 
an incredibly complex protection system. S^" 
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Whether you are a beginning BAS- 
IC programmer or an experienced as- 
sembly language programmer, sooner 
or later you'll need an assembler in 
your Apple programming toolchest. S- 
C Software's Macro Assembler version 
1.1 is one of the most versatile and 
easiest to use. 

System Requirements 

The S-C Macro Assembler requires 
an Apple ][, ][ + , or j[e; at least 32K 
RAM; and a single disk drive. It will 
work with the Apple's standard 4®- 
column display, as well as the ][e, STB 
and Videx 80-column boards. The as- 
sembler may be loaded into a lan- 
guage card, substantially increasing 
room for assembly language 
programs. 

Supplied on an un-protected DOS 
3.3 formatted diskette, the S-C Assem- 
bler can be backed up easily. The 
source code for the assembler is also 
provided, so experienced program- 
mers can modify the assembler to their 
liking (or their highly kludged 
machines). Purchases may be made 
directly from S-C Software Corpora- 
tion, 2331 Gus Thomasson Road, 
Suite 125, P.O. Box 280300, Dallas, 
TX, 75228 (214) 324-2058. The cost is 
$92.50. An excellent by-subscription 
newsletter for assembly language 



programmers, "Apple Assembly Line" 
is also offered by S-C Software. Sub- 
scriptions are $18 annually in the U.S. 

What Is An Assembler? 

High level languages such as BAS- 
IC and Pascal aren't a computer's 
"native" language. When executing a 
high level language, the computer 
must convert the program's IF THENs 
and FOR NEXTs into something it can 
understand. Conversion into the 
machine's native language takes time; 
the high level language statements oc- 
cupy large amounts of the computer's 
memory and can only do a limited 
number of things. (How, for example, 
can you play music from BASIC?). 



" Whether you are a be- 
ginning BASIC programmer 
or an experienced assembly 
language programmer, 
sooner or later you'll need 
an assembler in your Apple 
programming toolchest." 



You know, however, that the Apple 
can make sounds; you've games that 
beep, zip, bang and chirp. Music, fan- 




cy screen scrolling, faster DOS, and 
many other things are all made possi- 
ble through the use of the Apple's 
machine language. 

Unfortunately, Apple machine lan- 
guage is a bunch of hexadecimal bytes 
(base 16 numbers between and 255). 
To most people "20 90 FD 20 A3 FC 
60" doesn't even vaguely resemble a 
program which will print a line of dash- 
es across the screen, but that is what 
it will do. Assembly language takes 
commands only humans can under- 
stand, called mnemonics (neh- mon- 
ies), and converts them into the hex 
bytes of machine language. 

Creating machine executable pro- 
grams in assembly language is a two 
step process. First, you type in the 
source program. Then, the assembler 
converts it into the hexadecimal bytes 
of machine language called the object 
code or object program. 

Editing Features 

The S-C Macro Assembler uses a 
line based text editor, as opposed to 
some word processors which are 
screen based. One feature inherent in 
the S-C Macro Assembler which I find 
particularly convenient is that all the 
standard ESC codes are preserved. 
These commands for moving the cur- 
sor and clearing the screen should 
already be familiar to you from BASIC 
or Monitor programming. Because the 
source code for the S-C Macro Assem- 
bler is provided, these ESC functions 
can be modified and customized (ala 
GPLE) by reasonably experienced 
programmers. In addition, all DOS 
commands may be entered normally, 
A lead-in character such as '^^'-p jg 
required with some other assemblers. 

Twenty-nine commands, including 
global search and replace, are availa- 
ble during program editing {see fig. 1). 
All of the commands may be abbreviat- 
ed as short as their first three letters. 
Sufficient parameters are available to 
make these commands very flexible. 

Implementations of the commands 
are in many cases the same as in BAS- 
IC. For example, line ranges for com- 
mands may be written with a leading 
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or trailing comma. The command DEL 2000, deletes all 
iines ot source code beginning with line 2(M)®; LIST ,1509 
lists all lines through line number 15©(D. 

Whenever the assembler is sending output (such as list- 
ing or assembling programs) you can temporarily halt it by 
pressing any key. Pressing RETURN aborts the listing. 

If you load the assembler into a language card, it will look 
like Integer BASIC to DOS. You can temporarily exit from 
the assembler and run a program in Applesoft or machine 
language. By typing INT you can return to assembly lan- 
guage. However, before you leave the assembler, you 
should save your source program or it will be deleted when 
you try to return. 

One problem is that source programs will be stored to 
disk as type "I" files. DOS cannot distinguish these from 
genuine Integer BASIC programs. Trying to load an integer 
BASIC program while in the S-C Macro Assembler will be 
confusing to both you and your computer. This is a minor 
problem which can be overcome by any reasonably crafty 
person. Two solutions have occured to me. One, is the ad- 
dition of filename extensions (as in CP/M) to my source files. 
The extension .ASM is short, descriptive, and consistent 
with CP/M's conventions. The other solution is to keep 
source code files and Integer BASIC programs on separate 
disks. 

You may also opt to have your source code stored as 
a standard DOS text file. The S-C Macro Assembler's text 
file capability allows compatibility with other assemblers, 
disassemblers, and text editors. To read a standard text 
file into the S-C Assembler you simply turn on the assem- 
bler AUTO numbering feature and then EXEC the desired 
text file into the editor. . , 

Assembler Directives 

When first learning assembly language, I found the dis- 
tinction between the standard 65(D2 mnemonics and the as- 
sembler directives, or psuedo-ops, terribly confusing. It has 
always puzzled me why the writers of assemblers try to 
make their assembler's directives look like the 6502 
mnemonics. After all, assembler directives only tell the as- 
sembler what to do and aren't really part of your program. 

All of the S-C directives consist of two or more letters 
preceded by a period. This makes them stand out in a list- 
ing and in the programmer's mind. There are 25 assem- 
bler directives available from the S-C Macro Assembler (see 
fig.2). 

When taken together, the S-C directives allow many ad- 
vanced options. Included are conditional assembly, assem- 
bly direct to and from disk, multi disk operation, and the 
titling of assembly listings. 

Program Documentation 

S-C Software provides a handy reference card and 100 
pages of documentation in a three-ring binder for their as- 
sembler, I found the documentation a bit too technical for 
those totally unfamiliar with assembly language program- 
ming. It will not teach you assembly language, but will teach 
you how to use the assembler. 

The manual, which is indexed and has a table of con- 
tents, starts with a brief introduction. Next, is a four page 
tutorial to get you started. The largest part of the manual 
is occupied by sections on use of the assembler, in refer- 
ence form. Also included are examinations of memory 
usage and customizing of the assembler, 6502 program- 
ming, and Sweet-16, 
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OHShhhh- 

YOU NEED J|-|E 

Now Ihe fun begmsf With the 
CIA [Conlidentiai Iriformation 
Advisors) on the trail of your 

disks, fixing those I/O ERRORS is really fun! But repairing 
olobberred disks quickly and easily is actually just ttie 
beginning. TheCIA isa collection of five advanced disk utilities, 
working together to investigate, edit, locate, list, trace, rescue. 
translate, patch, repair, verify, examine, protect, unprotect, 
analyse encrypt and decrypt programs or textfiles on normal 
and even protected disks, be they DOS. PASCAL, or CPM' As 
you can see this is no ordinary bag o( tricks! ft is, in fact a new 
generation disk utility that goes far beyond anything else 
offered so far. 

But best of all. you don't have to be a memtier of the Gla/ed Eye 
Brigade to make full useof every one of these sophisticated and 
unique features We include a copy of the top secret 'CIA Files', 
a 120 pageeasy to follow, hand holding tutorial about the Apple 
(R) disk and the five CIA utilities Everything you need to know 
about disk patching, repair, formatting, protection, and 
encoding is explained in plain English! 

We're betting that within a few days of receiving the C(A Kit. 
you'll be TRYING to clobber a disk - just to have the fun of' 
putting it back together! You'll en|Oy a nevir confidence with 
your data storage. 

To get ALL FIVE utilities PLUS The CIA Files', for use with 
Apple (R) l|t-,''He. 48K, 1 or 2 drives Send $65,00 rWoney Order 
IChflcks. allow time to deal) NOT COPY 

c..=,-G„,.n,„,.„„.d PROTECTED 

Salea Dapt., HC7 GOLDEN DELICIOUS SOFTWARE LTD., 
350 Fifth Avenue, Suite 330S, New York. NY 10001. 



Special Features 

Besides all of the usual features found in assemblers, 
the S-C Macro Assembler provides many special en- 
hancements. 

If you've ever looked at a listing of an assembly language 
program you'll see that there are five columns of informa- 
tion. From left to right are the line number, label, mnemon- 
ic, operand, and comment fields. The S-C Assembler lets 
you automatically tab between fields by using control-l (the 
TAB key on the ][e). 

The line numbers are used exclusively by the assembler. 
If you wish to see a range of lines or delete a line, use the 
lines' numbers. You may not branch from within assembly 
language by using line numbers, as is the case in BASIC. 
Instead, branches are made to labels which are stored in 
the label field. To print a character, you would not GOSUB 
IMC, but JSR (the mnemonic for jump to subroutine) 
COUT. 

If you have even programmed in assembly language us- 
ing another assembler you may have encountered the 
problem of coming up with a unique name for each label. 
Within a single subroutine you may need to take several 
internal branches, each of which must be defined by its own 
label. For instance, not only is the label COUT used, but 
also COUTl , C0UT2, etc. This is avoided by the S-C Mac- 
ro Assembler through the use of local labels. Local labels 
are only defined relative to ttie preceding normal label. A 
local label is a number between 8 and 99 preceded by a 
period. Thus, a label named .1 could be defined several 
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times within a singie program. 

A comment in assembiy ianguage is 
like a remark in BASIC. The S-C Mac- 
ro assembler doesn't require a semi- 
colon or anything else before a com- 
ment if you put if in the comment field. 
Full line comments are available if you 
precede ttiem with an asterisk or 
semi-colon. 

Macros are single instructions 
whicti, when assembled, are replaced 
by a series of instructions you have de- 
fined. They can replace commonly 
used sequences of instructions, can be 
used as alternate mnemonics for 6502 
instructions, etc. As you may have 
guessed, the S-C Macro Assembler 
also supports macros. 

The S-C Macro Assembler's use is 
not confined to the assembly of stan- 
dard 6582 Mnemonics. Besides its 
capability to modify mnemonics using 
macros, it can assemble Steve Woz- 
niak's Sweet-16. S-C Software also 
offers a line of cross assemblers which 
use the S-C Macro Assembler stan- 
dard source editing features. When 
used with the Macro assembler these 
allow you and your Apple to write code 
for other microprocessors, from the 
65C02 to the 68000. The cross assem- 
blers range in price from $20 to $50. 

Additionally, there are several other 
products available through S-C Soft- 
ware which include a full-screen edi- 
tor and a disassembler which are 
compatible with the S-C Macro As- 
sembler. 

Conclusions 

The S-C Macro Assembler is a state 
of the art assembler which is easy to 
use, versatile, and appropriate for per- 
sons with all levels of programming 
knowledge. Of the assemblers I have 
used, I found the S-C Macro Assem- 
bler to be the best assembler for the 
Apple. S-C Software provides ade- 
quate support, and their policy of not 
copy-protecting their products is ad- 
mirable. 

FIGURE 1 

NEW- Deletes current source pro- 
gram and restarts S-C Macro As- 
sembler. 

LOAD- Loads a source program 
from cassette or disk. 

SAVE- Saves current source pro 
gram to cassette or disk. 

TEXT- Saves current source pro- 
gram to disk as a normal sequential 
text file. 

Page 16 



HIDE- Hides source program in 
memory so that is can be MERGEd 
with another source file. 

MERGE- Joins a source program 
with one which has been hidden by 
HIDE command. 

RESTORE- Recovers a source pro- 
gram if assembly is aborted while in- 
side of an .IN module (see Figure 2). 



Editing Commands 

LIST- Displays source program lines 
within a specified range or those con- 
taining a search string. 

FIND- Same as LIST. 

EDIT- Allows editing of source pro- 
gram lines. Edit displays the line to be 
edited and allows 15 control com- 
mands for moving the cursor, deleting 
and inserting text. 

REPLACE- Universal search and 
replace, verify or automatic 
replacement. 
Wildcards are allowed. 

DELETE- Deletes a range of pro- 
gram lines. 

RENUMBER- Renumbers source 
program. 

COPY- Copies one or more lines 
from one place to another. 



Listing Commands 

FAST- Sets listing speed to normal 
rate. 

SLOW- Sets listing speed slow 
enough to read. 

PRT- Jumps to a printer driver rou- 
tine at $1O0(D9 which must be written 
by the user. 

'- Sends a specified string to the cur- 
rent output device. 

Object Commands 

ASM- Assembles current source 
program into object code. 

MGO- Jumps to a memory location 
specified by a label or number, 

VAL- Evaluates an expression and 
prints its value in hexadecimal. 

SYMBOLS- Displays the assem- 
bler's symbol table (all of the labels 
your program uses). 
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IVIiscellaneous Commands 

AUTO- Turns on automatic line num- 
BERing. 

MANUAL- Turns off automatic line 
numbering. 

INCREMENT- Sets the increment 
used by automatic line numbering. 

MEMORY- Displays your program's 
current location in memory. 

MNTR- Puts you in the Apple's sys- 
tem monitor. 

RST- Lets you specify the address to 
which the Apple will jump when the 
RESET key is pressed. 

USR- Jumps to $1006, where you 
can place a machine language pro- 
gram or subroutine. 



FIGURE 2 




S-C Assembler 




Directives 


.OR 


Origin 


.TA 


Target address 


.TF 


Target file 


.IN 


Include file in assembly 


.EN 


End of program 


.EG 


Equate 


.SE 


Re-definable symbols 


.HS 


Hex string 


.DA 


Data 


.AS 


ASCII string 


.AT 


ASCII terminated string 


.BS 


Block storage 


.LIST 


Controls assembly 




listing (ON or OFF) 


.Tl 


Title 


.US 


User defined 


.PG 


Page eject 


.DO 


Conditional assembly 


.ELSE 


Conditional assembly 


.FIN 


Conditional assembly 


.DUMMY 


Begin a dummy 




section 


.ED 


End dummy section 


.PH 


Start phase 


.EP 


End phase 


.MA 


Macro definition 


.EM 


End macro 



Reviewed by Jeff Thomas 




The Disk Directory 
Designer 



By Tim Lewis 

Requirements: 

48K Apple ]i plus or J[e 
DOS 3.3 

The Disk Directory Designer (TDDD) 
is a utility designed to aid you in the 
creation of a new format for your 
CATALOG. Using this utility, you can 
change the message "DISK 
VOLUME" to any titie you want up to 
32 characters long, with normal, in- 
verse and flashing letters in it. You can 
also redefine the standard file type 
codes {T, I, A, and B) to any character 
you want, and do the same for the lock 
and unlock characters. Then you can 
have your CATALOG displayed in 1 , 2, 
4, or 5 columns. Your work may then 
be stored on disk for later use. This 
program can be used to format each 
disk in the way that is most useful for 
you. 

Entering TDDD 

1) Type in the program as listed on 
page 20 making sure that tfie check- 
sums that you have, using the program 
Checksoft, match the ones listed on 
page 22. 

2) Save the program to disk. 
SAVE DIRECTORY DESIGNER 

3) Start the program RUNning. 
RUN 



How to use the 
Directory Designer 

When the menu appears with the 
cursor waiting patiently at the bottom 
of the screen, press one of the letters 
in brackets (A-E) to select that option. 
Should you select the incorrect letter, 
press "ESC" or "RETURN" to exit the 
function. 

Here is a description ot each option. 

(AJ - CHANGE DIRECTORY TITLE 

Press the letter "A" to cause a se- 
cond menu to appear. This menu al- 
lows you to select the length of the titie 
you wish to use. There are three 
lengths available: {A) 12 characters, 
(B) 16 characters, and (C) 32 charac- 
ters. By pressing A, B or C, you select 
the maximum number of characters al- 
lowed in your title and how far the 
volume number (if displayed) will be 
from this title. 

Specialized Input 

This brings us to the specialized IN- 
PUT routine I developed for this pro- 
gram. Here is how to use it: 

First notice the compression for the 
word normal (NRML) on the left of the 
greater than sign (>). As long as 
NRML is in effect, the characters you 
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type are regular ones. Five control 
codes change the status of the charac- 
ters you type. They are: 

<=T''LN -Return to the default 
mode of NoRMaL. 

"^•"-1 -Characters that follow are 
INVerSe. 

""•■F -Subsequent characters 
are converted to FLaSHing. 

^^'"-C -Convert letters that fol- 
low to ConTRoL codes (dis- 
played during the INPUT as 
inverse.) 

cTfiLL. Following this, characters 
are converted to lowercase. If 
you do not have a computer 
equipped with lowercase, you 
probably shouldn't use this be- 
cause it will display meaning- 
less symbols. 

You may use the left arrow key (— ) 
and "RETURN" just like in a normal 
INPUT. In addition to this, characters 
that are usually not accessible through 
the Apple keyboard may be keyed in 
by pressing the following control 
codes: 

cthla_ Converted to an 

underline (" ") 

<^'"-@- Translated to a backslash 

C7") 
cTHLSHiFTHK. Rroduces a beginning 

bracket ("[") 

This INPUT routine allows virtually 
every character generated by your Ap- 
ple to be part of the input string. 

After typing the title, the program will 
ask if you want the VOLUME number 
to be printed next to the directory title. 

Once you type "Y" or "N" depend- 
ing upon whether you want the volume 
number displayed, the program will 
show you the title in the form that it will 
appear in the directory. You can now: 
Return to the menu without changing 
the heading in memory, redo the title, 
or put the title you just created in 
memory and go to the main menu. 

[B] - CHANGE DIRECTORY FORMAT 

From the main menu, if you hit "B", 
you will be ready to change the actual 
directory format. As soon as you do, 
a secondary menu will appear and the 
maximum number of characters al- 
lowed in a filename will be printed at 
the bottom of the screen. To return to 
the main menu, simply press "ESC." 
Here is a description of the features of 
this secondary menu: 

Option A will allow you to change the 
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lock and unlock codes. If you answer 
"N" to the question "DISPLAY 
LOCK/UNLOCK CODES ?" then the 
codes that are currently in memory 
won't even be shown in the directory. 
As in option A of the main menu, the 
previously mentioned special INPUT 
routine is used. Therefore a wide ar- 
ray of characters are available for this 
and the other format alterations. 

By pressing "B", you enter the file 
type alteration subroutine which allows 
you to change the codes for the four 
standard (B, A, I, and T) file types in 
much the same way as the above 
LOCK/UNLOCK subroutine does. 
Note that a modification to the "R" 
type of file is not provided for. 

The subroutine connected with the 
pressing of "C" merely asks you if you 
want the file lengths displayed in the 
directory. The file lengths {sometimes 
called sector numbers) are the three 
digit numbers between the file type 
and the filename. 

Next come what I call the "funny 
characters." Press "D" to change the 
characters {usually they are spaces) to 
the left and right of the file lengths. 

Last, by typing "E", another menu 
appears asking into how many 
columns you wish to divide the direc- 
tory. Press the letter corresponding to 
the number of columns you wish. For 
those of you with long filenames such 
as mine, you will notice that the last 
characters are cut off when more than 
one column is selected. After every for- 
mat alteration, the maximum number 
of characters is updated and displayed 
at the bottom of the format alteration 
menu. Note that in order to access files 
with names longer than the limit, you 
must still use the full filename. 

Those of you with 8ffl-column cards 
(this includes most Apple //e users) will 
notice that when in 80-column mode, 
the number of columns will be twice as 
many as selected (unless you choose 
one column). This is a result of using 
multiple columns. Also, for those of 
you with title names which use the 
backspace character to cover up the 
file length, file type, etc., this method 
may severely distort the appearance of 
your directory. This is also relative to 
the method used. 

IC] - LOAD/SAVE FORMAT 
AND TITLE 

If you type "C" from the main menu, 
the current directory format may be 
stored for later use or retrieved for 
modification. TODD stores a format on 
a disk as four files- three binary and 
one text. To install a previously saved 

Page 18 



format from BASIC, type "EXEC File- 
name." This will then BLOAD in the 
other three files which, by the way, 
have the same name with a .1, ,2 and 
.3 appended. The first binary file (the 
one named .1) is the CATALOG rou- 
tine in DOS, the next contains the file 
types and the last is the disk title. 

Note that the special INPUT routine 
is used when asking for the filename. 
This means that you may have a file- 
name with inverse, flashing or even 
control letters in it. Although strange 
filenames aren't recommended be- 
cause they are extremely hard to type 
from BASIC, TDDD will allow them. 

[E] - EXIT 

Use the last option, "D" to exit the 
program. If you exit by accident, just 
type "RUN" to get TDDD going again. 

I use a general format for my non- 
descript disks that looks something like 
this: 



CATALOG. After you have typed in a 
change, CATALOG the disk. Then fix 
it using the fix in the next column. If the 
fix won't work or the disk won't CATA- 
LOG, then reboot the disk. 



APPLE SYSTEM ][ + 



] TDDD 

• SPEED.SORT 

] SCREEN MAKER 

. SCREEN. ROUTINES 

" AS- > TEXT 



. SEARCH 
1 BLACK JACK 

• SCREEN.HELPER 

• SCREEN. PIC 

> FLY 



I replaced A for Applesoft with an 
ending bracket, I for Integer with a 
greater than sign, B for binary with an 
asterisk, and T for text file with a quote. 

For experienced programmers, I 
have included a description of the pro- 
gram and how it works. For those of 
you who are not so interested, you can 
skip to the WARNINGS section for 
some precautions about this programs 
use. 

Still with me? Good. Let's take a trip 
into the monitor and play around with 
DOS a bit. 

1 . Boot up on a disk with fresh, clean 
DOS on it such as the SYSTEM 
MASTER 

PR#6 

2. Enter the monitor 
CALL-151 

3. Examine the DOS CATALOG rou- 
tine (it extends from AD98 through 
AE69) 

AD98L 

4. As you cruise around this portion of 
memory, you will notice many JSRs to 
$FDED and a few JSRs to $AE42 and 
$AE2F. Try replacing some of these 
with NOP's (code EA). Below are a few 
examples of what may happen to your 



CATALOG 
Modification Table 


NORMALLY 


CHANGE 


EFFECT 


ADB3:2a ED FD 


ADB3;EA EA EA 


Remove disk title 


ADCB:2e 42 AE 


ADCBiEAEAEA 


Get rid of VOL # 


ADE5:2B ED FD 


ADE5:EA EA EA 


Remove LOCWUN- 
LOCK codes 


A0F9;2e ED FD 


ADF9:EA EA EA 


Dofi'tprtntfite types 


AEflB:2B 42 AE 


AEBBlEA EA EA 


Get rid o( file lengttis 


AE1B:2BEDFD 


/^1B:EA EA EA 


Don't print filename 


AE22:2e 2F AE 


AE22:EA EA EA 


Removes RETURN 
after filename. 



The last modification at $AE22 will 
look a little weird, but by shortening the 
number of characters printed in File- 
name (AE16-AE17), you can get mul- 
tiple columns. 

Basically, my program manipulates 
the pointers and data tables used by 
DOS's CATALOG to change the direc- 
tory's appearance. 

Possible Modifications 

When I first wrote the program, I was 
going to include options to switch or 
sort filenames, if anyone decides to 
make this modification, I would be in- 
terested in seeing it. 

Another modification that would be 
nice is to have the program store the 
new directory format on the DOS 
tracks rather than as files. 

Warnings 

This program uses the area between 
SBCDF $BCFF to store the 32 charac- 
ter title. Some fast DOSs use this area 
and therefore, using my program could 
cause a crash. My customized DOS 
was engineered around this area. 

TDDD uses the memory location 
used by the "R" file type for the 16 
character title. For those of you using 
these relocatable files, a different for- 
mat for these disks is advisable. 

This program may interfere with 
modifications made using DOS BOSS 
and other DOS customizers. 

Final comments 

The Disk Directory Designer was 
written over the summer whiie I bor- 
rowed my high school teacher's com- 
puter to do some typing for her. It is a 
very useful utility and I have used it 
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successfully. I hope It Is useful to you, 
too. 



Ir ****** t*** 



IB REM *" 

20 REM ** THE DISKETTE 

30 REM ** DIRECTORY DESIGNER** 

40 REM ** BY 

50 REM " TIM LEWIS 

rtfft PPhJt ******************* ^r-k * *-tr 

70 REM 

80 REM *INITALIZE VARIABLES* 

90 TEXT : MORMAL : SPEED=255: NOTRACE : 

GOSUB 1380 
100 REM 'BORDER* 
110 HOME : POKE 48, ASC ("-"): HUN 

0,39 AT 0: HLIN 0,39 AT 46: POKE 

48, ASC ("!'■) + 128: VLIN 2, 

45 AT fl: VLIN 2,45 AT 39 
120 POKE 34,1: POKE 32,1: POKE 3 

5,23: POKE 33,38 
130 REM *MENU* 
140 HOME :M$ = "THE DISK DIRECTO 

RY DESIGNER": GOSUB 1440 
158 VTA8 3:M$ = " 

": GOSUB 1440 

IM VTAB 5:M$ = "WRITTEN BY TIM 

LEWIS": GOSUB 1440 
170 VTAB 8: HTAB 10: PRINT CHR$ 

(91)"A1 CHANGE DIRECTORY TIT 

LE" 
180 VTAB 11: HTAB 10: PRINT GHR$ 

(91)"B1 CHANGE DIRECTORY FOR 

MAT" 
190 VTAB 14: HTAB IB: PRINT CHR$ 

(91)"C] LOAD/SAVE FORMAT & T 

ITLE" 
200 VTAB 17: HTAB 10: PRINT CHR$ 

(91)"D] SEE DIRECTORY" 
210 VTAB 20: HTAB 10: PRINT CHR$ 

(91)"E] EXIT PROGRAM" 
220 REM *YOUR CHOICE?* 
230 VTAB 23; HTAB 10: PRINT "YOU 

R CHOICE " CHR${91}" ]" CHR$ 

(8} CHRS {8); 
240 GET A$: IF A$ > "E" OR A$ < 

"A" THEN 240 
250 REM *GOTO PROPER ROUTINE* 
260 HOME : ON ASC {A$} - 64 GOSUB 

320,620,1140.280,1360: GOTO 

140 
270 REM *SEE DIRECTORY* 
280 TEXT : HOME : PRINT : PRINT 

CHR$ (4) "CATALOG" 
290 PRINT : INVERSE : PRINT "PRE 

SS ANY KEY" 
300 NORMAL : WAIT - 16384,128: GET 

A$; POP : GOTO 110 
310 REM 'DIRECTORY TITLE* 
320 MS = "* DIRECTORY TITLE *": GOSUB 

1440: VTAB 5: PRINT "<A> 12 

CHARACTER TITLE" 
330 PRINT "<B> 16 CHARACTER TITL 

E": PRINT "<C> 32 CHARACTER 

TITLE" 
340 VTAB 9: PRINT "YOUR CHOICE < 

>" CHR$ (8) CHR$ (8); 
350 GET A$: IF (A$ < "A" OR A$ > 

"C") AND A$ < > CHRS (27) AND 

A$ < > CHRS (13) THEN 350 
360 IF AS = CHRS (27) OR AS = CHRS 

(13) THEN RETURN 
370 HTAB 1: CALL - 868: VTAB ASC 



(AS) - 60: INVERSE : PRINT " 

<"AS">": NORMAL 
380 IF A$ = "A" THEN 6 = 45999:T 
= 46010:ML = 12: POKE 44463 

,11: POKE 44465,175: POKE 44 

466,179: GOTO 410 
390 IF AS = "B" THEN B = 45995:T 
= 46010: ML = 16: POKE 44463 

,15: POKE 44465,171: POKE 44 

466,179: GOTO 410 
400 B = 48351 :T = 48382:ML = 32: POKE 

44463,31: POKE 44465,223: POKE 

44466,188 
410 DM = T:DL = B 
420 REM *GET TITLE* 
430 VTAB 10: PRINT "ENTER TITLE" 

:V = 12: GOSUB 1460 
440 REM 'VOLUME #?* 
450 PRINT : PRINT : PRINT "DISPL 

AY THE VOLUME NUMBER ?" CHRS 

(8); 
460 GET AS: IF A$ < > "N" AND A 

S < > "Y" THEN 460 
470 IF AS = "N" THEN B = 44480:T 
= B + 2: GOSUB 1750:B = DL: 

T = DH;VOL = 0; GOTO 500 
480 POKE 44480,32: POKE 44481,66 

: POKE 44482,1 74 :VOL = 1 
490 REM *PRINT TITLE* 
500 POKE 34,2; HOME : POKE 34,1: 
VTAB 5: PRINT "THE WAY IT W 

ILL APPEAR:": VTAB 8; GOSUB 

1720; IF VOL THEN PRINT PEEK 

(46017) 
510 REM *0K?* 
520 VTAB 11; HTAB 1; PRINT "RETU 

RN=>OK" SPC( 3)"SPACE=>RED0" 
SPC( 3)"ESC=>MENU": PRINT : 
PRINT "WHICH ?" CHRS (8); 
530 GET AS: IF AS < > " " AND A 

S < > CHRS (27) AND A$ < > 
CHRS (13) THEN 530 
540 IF A$ = " " THEN B = 45999:T 
= 46010:ML = 12: POKE 44463 

,11: POKE 44465,175; POKE 44 

466,179; HOME : GOTO 320 
550 HOME 
560 IF AS = CHRS (27) THEN B = 

45999:T = 46010:ML = 12; POKE 

44463,11: POKE 44465,175: POKE 

44466,179: RETURN 
570 IFAS< > CHRS (13) THEN RETURN 
580 REM *PUT TrfLE IN MEMORY* 
590 MM = 
600 FOR I = T TO B STEP - 1:MM = 

MM + 1: POKE l,IAX(MM>: NEXT 

: RETURN 
610 REM *DIRECTORY FORMAT* 
620 M$ = "FORMAT ALTERATION": GOSUB 

1440; VTAB 4: PRINT "<A> LOC 

K/UNLOCK CODES": PRINT 
63B PRINT "<B> FILE TYPES"; PRINT 

; PRINT "<C> FILE LENGTHS": PRINT 
64fi PRINT " <D> FILE LENGTH SURRO 

UNDINGS": PRINT : PRINT "<E> 
NUMBER OF COLUMNS IN DIRECT 

DRY" 
650 PRINT : PRINT "<ESC> EXIT TO 
MAIN MENU": GOSUB 1790; IF 
PEEK (44567) = 29 THEN CHA = 

30: GOTO 670 
660 CHA = (46 / COL) - DC: POKE 4 



690 
700 



710 



73fl 
740 



750 



4567, CHA - 1 
67B VTAB 22: PRINT "FILENAME LIM 
IT: "CHA" CHARACTERS": VTAB 
17: PRINT "WHICH ?" CHRS (8) 

680 GET AS: IF (A$ < "A" OR A$ > 

"E") AND AS < > CHRS (27) AND 

A$ < > CHRS (13) THEN 680 

IF A$ = CHR$ (27) OR AS = CHRS 

(13) THEN RETURN 

HOME ; ON ASC (A$) - 64 GOSUB 

720,770,840.880,950: HOME ; GOTO 

620 

REM 'LOCK/UNLOCK' 
720 T = 44519;B = 445 17: MS = "OIS 

PLAY LOCK/UNLOCK CODES": GOSUB 

1070 

IF AS = "N" THEN 1750 

GOSUB 1770: VTAB 6;M$ = "ENT 

ER 'UNLOCK' CODE": GOSUB 112 

0: POKE 44508,X 

VTAB 11:M$ = "ENTER 'LOCK' C 

ODE": GOSUB 1120; POKE 44515 

,X: RETURN 
760 REM *FILE TYPE* 
770 T = 44539:B = T - 2:MS = "DIS 

PLAY FILE TYPES": GOSUB 1070 

IF AS = "N" THEN 1750 

GOSUB 1770: VTAB 5:M$ = "ENT 

ER BINARY FILE CODE"; GOSUB 

1120: POKE 45994,X 

VTAB 10:MS = "ENTER APPLESOF 

TFILE CODE": GOSUB 1120: POKE 

45993 X 

VTAB 15:M$ = "ENTER INTEGER 

FILE CODE": GOSUB 1120: POKE 

45992, X 

VTAB 26:M$ = "ENTER TEXT FIL 

E CODE": GOSUB 1120: POKE 45 

991, X: RETURN 

REM * SECTOR #* 
840 T = 44557 ;B = 44555 :M$ = "DIS 

PLAY THE FILE LENGTHS": GOSUB 

1070 

IF A$ = "N" THEN 1750 

POKE 8,32: POKE B + 1,66: POKE 

T,174; RETURN 

REM 'FUNNY CHARS* 
880 MS = "DISPLAY THE CHARACTER T 

THE LEFT OF THE FILE LENG 

TH": GOSUB 1070 

IF AS = "N" THEN POKE 44541 

,128: GOTO 910 

VTAB 6:M$ = "ENTER THE CHARA 

CTER": GOSUB 1120: POKE 4454 

1,X 
916 MS = "DISPLAY THE CHARACTER T 

THE RIGHT OF " + CHR$ (10 

) + "THE FILE LENGTH"; GOSUB 

1670 

IF A$ = "N" THEN POKE 44559 

,128: RETURN 

VTAB 6: MS = "ENTER THE CHARA 

CTER"; GOSUB 1120: POKE 4455 

9,X: RETURN 

REM 'COLUMNS* 

HOME :M$ = "DIRECTORY COLUMN 
SELECTION": GOSUB 1440: VTAB 

5: PRINT "<A> 1 COLUMN (NORM 

AL)": PRINT "<B> 2 COLUMNS" 

PRINT "<C> 4 COLUMN DIRECTOR 

Y": PRINT "<D> 5 COLUMNS IN 



780 
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DEAR AUTHOR: 

Would vou like to be published in 
Hardcore COMPUTIST? We would 
like 10 hear from you. 

Hardcore COMPUTIST welcomes 
articles and submissions on a variety 
of subjects of interest to users of the 
Apple (or compatible) computers and 
would like to publish well- written 
material on itie following: 

* Softkeys 

" Hardware Mntiifications 

* Advanced Playing Tccliniques 

* DOS modifications 

* Utilities 

* Product reviews 

* Adventure Tips 

* Original programs of interest 

* Do-it-yourself hardware prujecis 

* General interest articles 

* Bit-Copy Parameters 

We prefer to see your submission oti 
a DOS 3,3 disk using an Apple (or 
compatible) editing program. Please 
enclose a double -spaced hard copy 
(paper) manuscript using a dot-matrix 
or letter-quality printer (or typewriter). 
Submissions will be mailed back if 
adequate adequate return packaging is 
included. 

Hardcore COMPUTIST pays on 
acceptance. Rate of payment depends 
on the amount of editing necessary 
and the length of the article. Payment 
ranges between $ 1 for a short soft- 
key, and $50 per typeset page for a 
full-length article. We pay more for 
softkeys if the original commercial 
disk is enclosed for verification. We 
guarantee the disk's return, 

Softkey Publishing buys all rights as 
well as one-time reprint rights {for up- 
coming BEST OF Hardcore) on gener- 
al articles, and exclusive rights on 
programs. We may make alternate ar- 
rangements with individual authors, 
depending on the merit of the contri- 
bution. 

At present we are not accepting fic- 
tion or poetry submissions, but Hard- 
core COMPUTIST may make an 
exception for an outstanding 
computer-related short story or poem. 

For a copy of our WRITER'S 
GUIDE send a business -sized {20-cent) 
SASE (se!f-addressed, stamped enve- 
lope) to; 

Hardcore COMPUTIST 

WRITER'S GUIDE 

P. O. BOX 44549 

TACOMA WA 98444 



DIRECTORY" 
970 PRINT ; PRINT "WHICH 7" CHR$ 

(8); 
98B GET A$: IF (A$ < "A" OR A$ > 

"0") AND A$ < > CHR$(13) AND 

A$ < > CHR$ (27) THEN 980 
990 IF AS = CHR$ (27) OR A$ = CHR$ 

(13) THEN RETURN 
1000 T = 44580:8 = T - 2 
1010 IF A$ = "A" THEN POKE B,32 

: POKE B -I- 1,47: POKE T, 174: 
POKE 44567.29: RETURN 
1020 POKE 44567,0: GOSUB 1750:00 

L = 5: IF A$ = "B" THEN COL = 

2 
1030 IF A$ = "C" THEN COL = 4 
1046 RETURN 
1850 CHA = (40 / COL) - DC: POKE 

44567,CHA - 1 
1060 REM 'DISPLAY SOMETHING?* 
1070 HOME : VTAB 3: PRINT M$" ?" 

CHR$ (8);:ML = 1 
11580 GET AS: IF A$ < > "Y" AND 

AS < > "N" AND A$ < > CHRS 

(13) AND A$ < > CHR$ (27) THEN 

1(560 
1090 IF A$ = CHRS (13) OR A$ = 

CHRS (27) THEN POP : RETURN 
1100 PRINT CHRS {3)":"A$: RETURN 
1110 REM *ASK FOR ALTERATION* 
1120 HTAB 1:V = PEEK (37) + 3: PRINT 

MS: G0SU8 1460:X = 1A%{1): RETURN 
1130 REM *LOAO/SAVE FORMAT* 
114B MS = "* LOAD/SAVE DIRECTORY 



TYPE *"; GOSUB 144B: VTAB 5: 
PRINT "FILENAME TO USE:" 
1150 V = 7:ML = 15: GOSUB 1460:ML 

= L: POKE 771,237 
1160 VTAB 11: PRINT "<L>OAD DIRE 

CTORY" SPC( 5)"<S>AVE DIRECT 

ORY" 
1170 PRINT " ESC=>MENU" SPC( 12) 

"SPACE=>REDO": PRINT : PRINT 

"WHICH ?" CHRS (8); 
1180 GET AS: IF A$ < > "L" AND 

A$ < > CHR$ (27) AND A$ < 
> " " AND A$ < > "S" THEN 

1180 
1190 IF AS = CHRS (27) THEN POKE 

771,240: RETURN 
1200 IF A$ = " " THEN HOME : GOTO 

11 46 
1210 HOME : VTAB 12: HTAB 11: FLASH 

: PRINT "ONE MOMENT PLEASE." 

; NORMAL 
1220 IF AS = "S" THEN 1256 
1230 FOR X = 1 TO 3: PRINT CHR$ 

(4}"BL0AD";: GOSUB 1726: PRINT 

"."X: NEXT: POKE 771,240: RUN 
1240 REM *SAVE FORMAT' 
1250 PRINT : PRINT CHRS (4)"BSA 

VE";: GOSUB 1720: PRINT ".1, 

ASA098,LS97" 
1260 PRINT CHRS (4}:"BSAVE";: GOSUB 

1720: PRINT ".2,A$B3A7,LS04" 
1276 PRINT CHRS (4)"BSAVE":: GOSUB 

1726: PRINT ".3,A":DL;",L";0 

H - DL 4- 1 




"It is my sad duty to inform you that all of you, e?ccept one, will be 
replaced by computers." 
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1280 REM "EXECFILE* 

1298 PRINT CHR$(4)"0PEN";; GOSUB 

1720: PRINT : PRINT CHR$ (4 

)"DELETE";: GOSUB 1720: PRINT 
1300 PRINT CHR$ (4)"0PEN";: GOSUB 

1720: PRINT : PRINT CHR$ (4 

)"WRITE";: GOSUB 1720: PRINT 
1310 FORX = 1 TO 3: PRINT "BLOA 

0";: GOSUB 1720: PRINT "."X: 
NEXT : PRINT CHR$ {4}"CL03 

E" 
1320 HOME : VTAB 7: PRINT "TO IN 

STALL NEW FORMAT:": PRINT 
1336 PRINT "USE 'EXEC ";: POKE 7 

71,240: GOSUB 1720: PRINT "' 

II 

1340 PRINT: PRINT : POKE 771,24 

0: GOTO 290 
1350 REM "EXIT* 
1360 TEXT : HOME : VTA8 24: POP 

:END 
1370 REM *INITIALIZE* 
1380 T = 0:B = 0:DL = 45999;DH = 

4601B:CHA= PEEK (44567) + 

1:C0L = 1: IF CHA < 30 THEN 

COL = 2 
1390 ML = 0:L = 0:H = 0:V = 0: GOSUB 

1790: IF CHA < 13 THEN COL = 

4: IF CHA < 5 THEN COL = 5 
1400 POKE 768,169: POKE 770,76: POKE 

771,240: POKE 772,253 
1410 DIM IAX(32) 
1420 RETURN 
1430 REM *CENTER* 
1440 HTAB 20 - INT ( LEN (M$} / 

2): PRINT MS: RETURN 
1450 REM ^INPUT ROUTINE* 
1460 L = 0:X = 1: FOR I = 1 TO 32 

:IAX(I) = 160: NEXT: VTAB V 

: HTAB 1 
1470 PRINT "NRML>" CHR$ (10};: FOR 

I = 1 TO ML: PRINT "-";: NEXT 

:H = 6 
1480 VTAB V: HTAB H: GET A$ 
1490 IF AS = CHRS (29) THEN A$ = 

CHR$ (91) 
1500 IF A$ = CHRS (30) THEN A$ = 

CHRS (95) 
1510 IF AS = CHRS (0) THEN AS = 

CHR$ (28) 
1520 IF A$ = CHRS (13) AND L < 
> THEN PRINT : RETURN 
1530 IF AS = CHRS (8) AND L = 

THEN 1480 
1540 IF AS = CHRS (8) THEN IAX( 

L) = 32:1 = L- 1;H = H- 1: 
PRINT AS;: CALL - 868; GOTO 

1480 
1550 IFA$= CHRS {14) THEN HTAB 
■NR1VIL";;X = 1: GOTO 



OR 



1560 



1570 



1580 



1590 



IF AS = 
1: PRINT 
1480 

IFA$ = 
1 : PRINT 
1480 

IF AS = 
1; PRINT 
1480 

IF AS = 
1: PRINT 
1480 

IFA$ = 



CHRS (9} THEN HTAB 
'INVS";:X = 2: GOTO 

CHR$ (6) THEN HTAB 
'FLSH";:X = 3: GOTO 



CHRS (3) THEN 
"CTRL";:X = 4: 



HTAB 
GOTO 



1480 
1600 IF L = > ML OR AS < " " 
AS > CHRS (95} THEN 1480 
1610 L = L + 1:H = H + 1: ON X GOTO 

1620,1630,1650,1670,1690 
1620 PRINT AS;:IA%(L) = ASC (AS 
) + 128: GOTO 1480 

INVERSE : PRINT AS;: NORMAL 
:IAX(L) = ASC (AS) - 64: IF 
AS < "@" THEN IAX(L} = ASC 
(AS) 

GOTO 1480 

FLASH : PRINT AS;: NORMAL : 
IA%{L} = ASC (AS): IF AS < 
"@" THEN lAX(L) = ASC (AS} + 
64 

GOTO 1480 

IF AS < "®" THEN 1620 

INVERSE : PRINT AS;: NORMAL 
;)AX(L) = ASC (AS) + 64: GOTO 
1480 



1630 



1640 
1650 



1660 
1670 
1680 



1690 IF AS < "@" THEN 1620 
1700 PRINT CHRS ( ASC (AS} + 32 

);:!AX(L) = ASC (AS) + 160: 
GOTO 1480 
1710 REM *PR1NT WAY IT APPEARS* 
1720 FOR I = 1 TO ML 
1730 POKE 769,IA%(I): CALL 768: NEXT 

: RETURN 
1740 REM -NEGATE CAT. ROUTINE* 
1750 FOR 1 = B TO T: POKE 1,234: 

NEXT : RETURN 
1760 REM *ACTIVATE GAT. ROUTINE* 
1770 POKE B,32: POKE B + 1,237: POKE 

T,253: RETURN 
1780 REM 'FIGURE EXTRA SPACE* 
1790 DC = ( PEEK (44517) < > 234 

} + ( PEEK (44539} < > 234) 
1800 DC = DC + 3 * ( PEEK (44555) 
< > 234) + { PEEK (44541) < 
> 128) + ( PEEK (44559) < > 

128): RETURN 



Checksums 



CHRS (12) THEN HTAB 



10 
20 
30 
4B 
50 

m 

70 
60 

90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 



210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 



1: PRINT "LOV\/R";:X = 5: GOTO 



-$BADD 410 

- $9B13 420 

- $4D3B 430 

- $AD92 440 

- $C899 450 

- $FF65 460 

- $A3BF 470 

- $A900 480 

- S6635 490 
• $F3B7 500 

- $9C15 510 

- $2A19 520 

- $972C 530 

- $DB48 540 

- $D3E1 550 

- $8937 560 

- $888C 570 
-$DA93 580 

- $AAB4 590 

- $B1A5 800 



- $9786 610 

- $E4C8 620 

- $8B1A 630 

- $063C 640 

- $A636 650 

- $3F80 660 

- $F000 670 

- $425C 680 

- $9F73 690 

- $0628 700 

- $5F77 710 

- $5780 720 

- $2347 730 
-$C51E 740 

- $403A 750 

- $E4E2 760 

- $AA62 770 

- S0E23 780 

- $FEC5 790 

- $0700 800 



- $A22B 810 

- $B7BE 820 

- $8BC1 830 

- $CDD1 840 

- $C1S9 850 

- $6A87 860 

- $7D8F 870 

- $AD1C 880 

- $1C58 890 

- $0176 900 

- $6E22 910 

- $5710 920 

- $B2D8 930 

- $A360 940 

- $F2F9 950 

- $F90C 960 

- $FAE5 970 

- $06A9 980 

- $BAAB 990 

- $7DA0 1000 



$RE7 

$10EA 

$CBC8 

$1611 

$9DA9 

$0FO6 

$3129 

$B7F8 

$AD61 

$0359 

$8A89 

$56A7 

$A7A1 

$332C 

$0BEF 

$5CAE 

$D33A 

$769C 

$1EC2 

$A494 



$5CCB 


1210 


$762C 


1220 


$614F 


1230 


$C0G5 


1240 


$B9FD 


1250 


$C058 


1260 


$1555 


1270 


$3FF9 


1280 


$2B69 


1290 


$9098 


1300 


$039A 


1310 


$7F19 


1320 


$35A5 


1330 


$9C7F 


1340 


$507B 


1350 


$F48E 


1360 


$8836 


1370 


$5190 


1380 


$B881 


1390 


$56B2 


1400 



010 
020 
030 
040 
050 
060 
070 



100 
110 
120 
130 
140 
150 
160 
170 
180 
190 
200 



$41 FB 
$8ADF 
$4D2B 
$1456 
$237F 
$8306 
$2A97 
$C88B 
$86B5 
$6068 
$4053 
$5O0E 
$CE09 
$AF13 
$F603 
$FD17 
$E6BE 
$30E5 
$0CF3 
$BA32 



1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 



$CC56 
$92F5 
$052C 
$6C48 
$95E9 
$16EC 
$0735 
$63A0 
$6E0E 
S2607 
$6925 
$1863 
$5904 
$A3B5 
$0836 
■ $445C 
$DEA9 
$9620 
$09 B4 
$2E2F 



$8418 

$0EA1 

$375F 

$EE53 

$7D2D 

$A9EA 

$CAF9 

$9827 

$4D0B 

$2020 

$42DE 

$6F8B 

$C01D 

$AB85 

$5440 

$6BEA 

$378E 

$9B68 

$3166 

$859C 



1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 



- $EB3B 

- $ABE2 

- $0B7F 

- $5FB9 

- $3788 
-$1861 

- $9687 

- $035E 

- $FD6E 

- $69A3 

- $625F 

- $E2E5 

- $9C8D 

- $D4D7 

- $00DF 

- $9ED1 

- $8A3F 

- $FE91 

- $7566 

- $DB86 
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COREFILERCOREFILERCOREnLERCOREnLERCORinLERCOSEFILERCOREriLERCOREFILERCOREriLESCOREFILE 

COREFILER 

CORIFILIRCOREFILIRCOREFILERCOREnLIRCOREFILIRCOREFILERCOREFILERCORIFILERCOREFILERCOREnLE 



Requirements: 

Apple 11 Plus or compatible with 48K 

RAM 

One disk drive 

A lot of you out there are probably 
thinking that databases may be the 
greatest thing since the living girdle, 
but what good are they to me unless 
I open my own business manufactur- 
ing microprocessor-controlled panty 
hose, or some such item? 



Moved & Missed 
An Issue? 

HERE'S WHY! 

• You didn't go to the post office 
and sign to have your magazines 
foiwarded. 

OR 

* You went to the post office and 
filled out a forwarding address, not 
knowing that forwarding service ex- 
pires in three months. It does not 
last forever. So, your magazines are 
still going to your old address or, 
worse yet, they're being destroyed. 

HERE'S WHAT 
YOU DO! 

To get issues that you've 
missed, write our subscription 
department for back issue infor- 
mation. 

OR 
SAVE YOURSELF A LOT OF 
TROUBLE 
(Don't miss an issue!) 
And send your change of ad- 
dress 30 days before you move, 
using postal form 3567 to: 

Hardcore COMPUTIST 

Subscription Departnnent 

P.O. Box 44549 

Tacoma, WA 98444 



Because the survey of the readers 
of Hardcore COMPUTIST which we 
conducted has shown that the average 
reader cannot maintain a proper men- 
tal perspective without typing in at 
least 258 lines of BASIC or Assembly 
code each month, the editor decided 
to present a program that would both 
satisify our readers' desires and 
demonstrate an application of a data- 
base for the average person. 

This program will allow you to keep 
a record of any kind of important infor- 
mation you have, whether it be your 
Christmas card mailing list or a cata- 
log of your collection of sixteenth cen- 
tury Samurai swords. 

The user can set up the format of the 
files to meet his particular needs. Then 
he can enter, edit, search and finally 
print out the stored information, either 
one record at a time, or the whole file. 
We call this program COREFILER. 



COREFILER evolved out of a pro- 
gram that Softkey Publishing uses in- 
house to keep track of its subscribers 
and advertising clients. Since most 
people don't have a great need to do 
this sort of thing, we decided to modi- 
fy our original database program so 
that it could be configured to almost 
any application. 

The COREFILER system is really 
four separate programs which work in 
conjunction with one another but, be- 
cause of the length of these programs, 
this issue we will only contain the main 
database program. The following issue 
will contain the other three programs 
which handle screen formating, file 
configuration and menu presentation. 

Basically a file management pro- 
gram as currently structured, 
COREFILER can handle a maximum 
of 450 records per file on a floppy or 
hard disk based Apple or Apple com- 
patible. Only one file can be operated 
on at a time, but this should not be a 
serious restriction for limited home or 
small business applications. 

Like most other database-type pro- 
grams, COREFILER uses random ac- 
cess text files for quick storage and 
retrieval of data. Table 1 gives a com- 
plete list of the program's file manage- 



Page 22 




Hardcore COMPUTIST no.7 



ment functions which includes: Add, 
Delete, Edit, Search, Print and Read. 
A sorting capability has not been in- 
cluded. 

COREFILER may not have all the 
whistles and bells which sonne of the 
connmerciat database packages have, 
but its price is surely hard to beat. En- 
terprising programmers might like to 
add a sort or more sophisticated 
search routines to the program. 

Because of the length of the 
COREFILER program, I suggest that 
the CHECKSOFT program from Hard- 
core COMPUTIST 1 be run on 
COREFILER. This will make it much 
easier for you to spot any errors you 
may have made while typing in the pro- 
gram. The checksums following the 
COREFILER listing were generated by 
using CHECKSOFT in its normal con- 
figuration mode (ignore REM's and 
program pointers. Use line numbers). 

Next issue we will print the remain- 
ing programs which make up the 
COREFILER system. By that time, you 
may have finished typing in the listing 
from this issue. 

Table 1 



COREFILER Basic Functions 

A - Adds records to the current file. 
E - Edits the information in the current 
record. 

L - Retrieves the record previous to the 
current record. 

N - Retrieves the record which follows 
the current record. 
R - Reads in any record in the 
database. 

S - Searches the entire database for 
the specified information in a particu- 
lar field. 

D - Deletes the current record from the 
database. 

P - Prints out either the current record 
or the entire file. The printer interface 
is assumed to reside in slot#1 , 

/ - Allows the user to work on another 
existing file. 

X - Exits the COREFILER program. 

Editing Functions 

cTBLp . peie^0s the character under 

the cursor. 

cTf"-B . Jumps to the beginning of the 

current field, 

cTHLg . Jumps to the end of data in the 



) 
current field. 

"RL|_ . Deletes from the cursor to the 
end of the current field, 
'^•"■n - Recovers the data that was in 
the current field before editing was 
begun. 

t^Hi-p . Exchanges the data in the cur- 
rent field with the data in the following 
field. 

ESC - Saves the current record to disk 
and exits the edit mode. 

Add Mode Functions 

ESC - Saves the new record to disk. 
Hitting ESC a second time exits the 
"Add" mode. 

■^"■-X - Exits the "Add" mode without 
saving the current record to disk. 



fr»******t ft*A« * 



* ft *4 ft 



10 REM ""*"" 

20 REM * 

30 REM * COREFILER 

40 REM * 

50 REM * FILE MANAGEMENT 

60 REM * 

70 REM • PROGRAM 

80 REM * 

90 REM ********************** 

95 REM 

100 POKE 1013,76: POKE 1014,9: POKE 

1015,3 
110 FORX = 777 TO 827: READ XX: 

POKE X,X%: NEXTX 
120 DATA201,132,24B,3,76,2ei,22 

2,32,177,0,32,227,223,32,44. 

213,232,169,0,2,208,250,134, 

157,138,32,82,228,160,0,145, 

131,200,165,113,145,131,280, 

165,114,145,131,160,2,162,0, 

165,157,76,226.229 
130 G$ = GHR$ {7} 
140 A$ = "":D$ = CHR$(4): TEXT 

: HOME :G$ = CHR$ (7) 
150 SL = PEEK (770) ;0V = PEEK ( 

771) 
160 IF PEEK (768) = 255 AND PEEK 

(769) = 255 THEN 180 
170 POKE 768,255: POKE 769,255: POKE 

770,SL: POKE 771,0V 
180 GOTO 2630 
198 REM READ A FILE 
208 PRINT : PRINT OF$XL",V"V: FOR 

X = 1 TO RC: PRINT RF$X",B"B 

Y(S): & INPUT S$(X): NEXT : 
PRINT CL$: RETURN 
210 REM READ A RECORD 
220 IF RR = THEN RETURN 
230 A$ = ">> READING RECORD #" + 
STR$ (RR) + " «": GOSUB t1 

20 
240 PRINT : PRINT OF$XL",V"V: FOR 

X = 1 TO NF: PRINT RF$RR",B" 

BY(Xj: & INPUT A$(Xj: NEXT 

: PRINT CL$ 
250 RETURN 



Attention 
Adventurers! 

ADVENTURE DATA BASE 

Hardcore COMPUTIST is 
looking for adventure hints to 
any of the popular adven- 
ture/fantasy games sold for 
the Apple li/ll Plus or lie. We 
hope to develop a data base 
of these hints and, if sufficient 
response is received, to pub- 
lish a regular column in Hard- 
core COMPUTIST. 

YOUR CLUES, PLEASE 

We prefer that these hints 
not be dead giveavway solu- 
tions to dilemmas presented 
by the particular game but in- 
stead, contain just enough in- 
formation to nudge the 
stumped adventurer towards 
the solution of his or her 
problem. 

HOW AND WHERE 

So, if you know how to open 
the jewel-encrusted egg, how 
to plug the hole in the row- 
boat, where to find the key to 
the treasure chest, or any 
other information that may be 
of help to your fellow travel- 
ers, please send this informa- 
tion on a 3 X 5 postcard to: 

Hardcore COMPUTIST 
Attention: Adventure Hints 
P.O. Box 44549 
Tacoma, WA 98444 

P.S. Please don't forget to in- 
clude the name of the adven- 
ture game to which your hint 
pertains. 
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ISHt' 


570 


r ....•■ 


580 


' 


590 


K 


600 


1 


610 


IRR 


620 


.* 


630 




640 



260 REM GET ID NUMBER 

270 PRIM : PRINT OF$XL",V"V; PRINT 

RF$; INPUT RO.RT, 10; PRINT C 

L$; RETURN 
280 REM WRITE A RECORD 
290 IF RR = THEN WF = RR: RETURN 
300AS = ">> SAVING RECORD #" + STRS 

(RR) + " <<": GOSUB 1120 
310 PRINT: PRINT OF$XL",V"V: FOR 

X = 1 TO NF: PRINT WF$RR",B" 

BY(X): PRINT A$(X): NEXT 
320 PRINT WF$0: PRINT RC: PRINT 

RT: PRINT ID; PRINT CL$:WF = 

0: RETURN 
330 REM READ VARIABLES FILE 
340 PRINT : PRINT D$"OPEN"N$".CO 

NFIG": PRINT D$ " READ "N$", CON 

FIG": INPUT NF: FOR X = 1 TO 

NF: INPUT VT(X),HT(X},NN$(X) 

,H2(X),LN(X},BY(X): NEXT : INPUT 

XL: INPUT V; PRINT D$"CLOSE" 

: RETURN 
350 REM FLIP FIELDS 
360 CC = CT + 1 
370 IF GC > NF THEN CC = 1 
380 T$ = A$(CT);A$(CT) = A$(CC);A 

$(CC} = T$ 

390 RETURN 

400 REM » INPUT ROUTINE CODE << 

410 REM PRINT NEW STRING 

420 \n"AB VT{CT); HTA8 H2(CT); IF 

NOT ED THEN PRINT A$(CT): RETURN 
436 IF LEN (A$(CT)} < 1 AND HT[ 

CT} = H2(CT} THEN PRINT NN$ 

(CT);:LL = LEN (NN$(CT)): GOTO 

450 
44C PRINT A$(CT);:L = LEN (A$(C 

T)):LL = L 
450 IF LL = LN(CT) THEN RETURN 
460 FOR X = 1 TO LN(CT) - LL: PRINT 

CHRS (95);: NEXT : RETURN 
470 REM DELETE SUBROUTINE 
480 IF P > L THEN RETURN 
490 IF L = 1 THEN A$(CT) = "": RETURN 
5B0 IF P = L THEN A$(CT) = LEFT$ 

(A$(CT),P - 1): RETURN 
510 IF P = 1 THEN A$(CT) = RIGHT$ 

(A$(CT),L - 1): RETURN 
520 A$(CT) = LEFTS (A$(CT),P - 1 

) + R(GHT$ (A$(CT),L - P}: RETURN 
530 REM INSERT SUBROUTINE 
540 IF P = 1 THEN A$(CT) = CHS + 

A$(CT): RETURN 
550 IF P = L THEN A$(CT) = LER$ 

(A$(CT},P ■ 1) + CH$ + RIGHTS 

(A$(CT),1): RETURN 
560 A$(CT) = LEFTS (A$(CT),P - 1 

) + CHS + RIGHTS (A$(CT),L - 

P + 1): RETURN 

REM BACKWARD MOVE 
P = P - 1: IF P > THEN 610 
P = 1: IFCT = OTHEN RETURN 

NORMAL : GOSUB 420: INVERSE 

:CT = CT- 1: IF CT < 1 THEN 

CT = NF 
OS = A$(CT):L = LEN (AS(CT)} 

RETURN 

REM FORWARD MOVE 
P=P+1:IFP>L*1 THEN 

P= L+ 1 
650 IFP > LN(CT)THEN P = 1:CT = 

CT + 1;L = LEN (A$(CT)): If 



CT > NF THEN CT = 1 "" ' 
660 RETURN 

670 REM MOVE CURSOR BACKWARD 
680 IF CHS = CHR$ (8) THEN GOSUB 

580: GOTO 990 
690 REM MOVE CURSOR FORWARD 
700 IF CHS = CHRS (21) THEN GOSUB 

640: GOTO 990 
710 REM SAME AS BEFORE 
720 IF CH$ = CHRS (18) THEN A$( 

CT) = BS:P = 1: GOTO 990 
730 IF CHS = CHRS (16) THEN GOTO 

360 
740 REM DELETE A CHARACTER 
750 IF CHS = CHR$ (4) THEN GOSUB 

480: GOSUB 420: GOTO 1080 
760 REM EXIT TO MENU 
770 IF CHS < > CHRS (27) THEN 

840 
780 IF NOT AD THEN NORMAL : GOSUB 

420: POP : GOTO 1450 
790 FOR = 1 TO NF: IF AS{D) < 

> "" THEN ZW = 1 
B0fl NEXT 
810 IF 2W THEN ZW = 0: NORMAL: GOSUB 

420: POP : GOTO 1450 
820 AD = 0:WF = 0:RR = RR - 1:RC = 

RC-1: NORMAL : GOSUB 220: GOTO 

1450 
830 REM RETURN TO CALLER 
840 IF CHS = CHR$ (13) THEN RETURN 
850 REM RETURN WITHOUT SAVE 
860 IF CHS = CHRS (24) THEN RETURN 
870 REM JUMP TO END OF LINE 
880 IF CHS = CHRS (5) THEN P = 

L + 1: GOSUB 426: GOTO 1080 
890 REM JUMP TO START OF LINE 
900 IF CHS = CHRS (2) THEN P = 

1: GOSUB 420: GOTO 1080 
916 REM CLEAR TO END OF LINE 
920 IF CHS = CHRS (12) AND P = 

1 THEN A$(CT) = "": GOSUB 42 

0: GOTO 1686 
930 IF CHS = CHRS (12) THEN AS( 

CT) = LER$(AS(CT},P-1): 
GOSUB 420: GOTO 1080 
940 REM INITIAL ENTRY POINT 
950 BS = A$(CT):L = LEN (AS(CT}) 
960 REM ENTER WITH STRING AND TA 

BS 
970 GOSUB 420:P = 1 
986 REM TAB AND PRINT STRING 
990 GOSUB 420: VTAB VT(CT): HTAB 

H2(CT) - 1 + P: GET CHS 
1606 REM CTRL CHARACTER CHECK 
1616 IF CHS < " " THEN 680 
1020 REM INSERT A CHARACTER 
1636 IFP < = LTHEN GOSUB 540 

: GOTO 1066 
104flAS(CT) = A$(CT) + CHS 
1050 REM INCREMENT CURSOR 
1060 P = P + 1 
1070 REM IS FIELD FULL? 
1080 L = LEN (AS{CT)): IF L > LN 

(CT) THEN L = LN(CT):AS(CT) = 
LERS (A$(CT},LN(CT)) 
1090 IF P > LN(CT) THEN P = LN(C 

T): PRINT CHRS (7): RETURN 
1106 GOTO 990 
1118 REM CENTER AND PRINT 
1126 GOSUB 1390: VTAB 10 
1136 HT = 20- ( LEN (A$) / 2): IF 



HT < 1 THEN HT = 1 
1140 HTAB HT: PRINT AS: RETURN 
1150 A2$ = "" 
1160 REM CENTER AND PRINT WITH P 

ROMPT 
1170 GOSUB 1390: VTAB 8 
1180 IF LEN (AS) > 1 THEN GOSUB 

1136: PRINT 
1190 IF LEN(A2S) > 1 THEN AS = 

A2$: GOSUB 1130: PRINT 
1200 VTAB 16 
1210 IF AX THEN PRINT " PRESS R 

ETURN WHEN READY TO CONTINUE 

"GS" 
1226 IF NOT AX THEN PRINT "PRE 

SS 'Y' FOR YES OR 'N' FOR NO 
(Y/";: INVERSE : PRINT "N"; 

: NORMAL : PRINT "):"G$; 
1230 GET AN$: PRINT ANS 
1240 IF AX AND AN$ < > CHRS (1 

3) AND ANS < > CHRS (27) THEN 

1266 
1250 IF NOT AX AND ANS = CHR$ 

(13) THEN ANS = "N" 
1260 IF NOTAX AND AN$ < > "Y" 
AND ANS < > "N" THEN 1260 
1270 RETURN 

1280 REM ZERO DATA STRINGS 
1290 FOR CT = 1 TO NF:A$(CT) = " 

": NEXT 
1300 REM PRINT RECORD STATUS 
1310 VTAB 1: HTAB 1: PRINT "RECO 

RO #"Rfl" ":: HTAB 17: PRINT 

"USED "RC" ";: HTAB 36: PRINT 

"UNUSED "RT-RC;: CALL -8 

68 
1320 REM PRINT DATA TO SCREEN 
1330 GOSUB 1396: FOR CT = 1 TO N 

F: IF HT(CT) = H2(CT) THEN 1 

350 
1346 VTAB VT(CT): HTAB HT(CT): PRINT 

NN$(CT); 
1356 GOSUB 420: NEXT : VTAB 19: RETURN 
1360 REM PRINT 40 " = "'S 
1370 HTAB1: FOR X = 1 TO 40: PRINT 

" = ";: NEXT : RETURN 
1380 REM CLEAR DATA WINDOW 
1390 POKE 34,2: POKE 35,17: HOME 

: POKE 34,18: POKE 35,24: RETURN 
14041 REM ERROR-NO RECORDS 
1410 AS = "> NO RECORD AVAILABLE 

<":AX = 1: GOSUB 1150 
1420 REM COMMAND MENU 
1430 FORCT = 1 TO NF:AS(CT1 = " 

": NEXT 
1440 REM NORMAL ENTRY POINT 
1456 CALL - 16621:ED = 0: GDSU8 

1310: IF WF THEN GOSUB 290: 
GOSUB 1310 
1466 IF AD THEN 1660 
1470 HOME 
1480 PRINT "(A) ADD";: HTAB 11: PRINT 

"(S) SEARCH";: HTAB 28: PRINT 

"(D) DELETE" 
1496 PRINT "(E) EDIT";: HTAB 11: 

PRINT "(R) READ RECORD";: HTAB 

28: PRINT "(/) NEW RLE" 
1560 PRINT "(L) LAST";: HTAB 11: 
PRINT "(P) PRINT";: HTAB 28 

: PRINT "(?) STATUS" 
1510 PRINT "(N) NEXT";; HTAB 28: 
PRINT "(X) EXIT" 



Page 24 



Hardcore COMPUTIST no.7 



1520 HTAB 1: VTAB 24: PRINT "ENT 

ER COMMAND: ";: GET AN$: VTAB 

23 
1530 IF AN$ = "A" THEN 1666 
1540 IF AN$ = "E" THEN 1726 
1550 IF AN$ = "L" THEN 1780 
1560 IF AN$ = "N" THEN 1820 
1570 IF AN$ = "S" THEN 1870 
1580 IF AM$ = "R" THEN 2266 
1596 IF AN$ = "P" THEN 2270 
1600 IF AN$ = "D" THEN GOSUB 24 

96: GOTO 1456 
1610 IF AN$ = "X" THEN 2570 
1620 IF AN$ = "?" THEN 2626 
1630 IF AN$ = "/" THEN RUN 
1640 PRINT CHR$ (7);: GOTO 1526 
1650 REM ADD A RECORD 
1660 IF RC = RTTHEN A$ = "> DIS 

K FULL <": GOSUB 1150: GOTO 

1450 
1670 AD = 1: HOME : PRINT : HTAB 

14: PRINT "ADD A RECORD": PRINT 

: PRINT " PRESS <ESC> TO RET 

URN TO COMMAND MENU." 
1680 RC = RC + 1:SE = 0:RR = RC:E 

D = 1: GOSUB 1296:CT = 1:WF = 

1 

1696 B$ = A${CT): INVERSE : GOSUB 

970: NORMAL : GOSUB 420:CT = 

CT + 1 : IF CT > NF THEN CT = 

1 
1706 IF CH$ = CHR$ (24) THEN WF 

= 0:RC = RC- 1:RR = RC; GOSUB 

350: GOSUB 220: GOTO 1450 
1716 GOTO 1690 
1726 IF RR = 6 THEN 1410 
1730 HOME : PRINT : HTAB 14: PRINT 

"EDIT A RECORD": PRINT: PRINT 

" PRESS <ESC> TO RETURN TO C 

OMMAND MENU." 
1746 EO = 1: GOSUB 1310:CT = 1;WF 

= 1 
1750 INVERSE : GOSUB 950: NORMAL 

: GOSUB 426:CT = CT + 1: IF 

CT > NF THEN CT = 1 
1760 GOTO 1750 
1776 REM READ LAST RECORD 
1780 REM 
1790 RR = RR - 1: IF RR < 1 THEN 

RR = 1: GOTO 1450 
1800 GOSUB 220: GOTO 1456 
1816 REM READ NEXT RECORD 
1820 REM 
1830 RR = RR + 1: IF RR > RC THEN 

RR = RC: GOTO 1450 
1840 GOSUB 220: GOTO 1456 
1850 REM >> ENTRY SEARCH << 
1860 REM CLEAR SCREEN 
1870 VTAB 1: HTAB 9: PRINT " 

": GOSUB 1390: PRINT :X = 1 
1886 REM PRINT FIELDS 
1890 PRINT X". "NN$(X);: IF X < 

> NF THEN X = X + 1: HTAB 2 
0: PRINT X". "NN$(X}: IF X < 

> NFTHENX = X + 1: PRINT 
: GOTO 1890 

19«0 HOME : PRINT 
1910 REM GET FIELD NUMBER 
1926 HOME : PRINT : PRINT "FOUND 
IN WHAT FIELD? (1-"NF") :": 
CT = 0:VT(0) = 20:LN(0) = 2: 
H2(0) = 3e;A$(0) = "":ED = 1 



: GOSUB 970 
1930 IF LEN (A$(CT)) < 1 THEN 1 

456 
1940 S = VAL (A$(CT)): IF S < 1 OR 

S > NF THEN 1926 
1950 REM GET SEARCH KEY 
1966 HOME : PRINT : PRINT "ENTER 

ITEM TO SEARCH FOR: ":LN(fl) = 

LN(S}:VT(fl) = 22:H2(6} = 1:A 

$(0) = "":ED = 1:CT = 0: GOSUB 

970:SF = LEN {AS(0)) 
1970 REM CLEAR SCREEN 
1980 ED = 0: HOME 
1990 IF SF < 1 THEN 1450 
2000 REM IS DATA IN MEMORY 
2616 IFS = SETHEN 2060 
2020 REM GET THE DATA 
2030 A$ = "> RECALLING DATA <": GOSUB 

1120: GOSUB 200 
2040 GOSUB 200 
2050 REM COMPARE TO KEY 
2060 SE = S:RX = RR:A$ = "> SEARC 

HING <": GOSUB 1120 
2670 FOR RR = 1 TO RC 
2686 IF LEFTS {S$(RR),SF) = A$( 

0) THEN GOSUB 220: GOSUB 21 

56 
2096 NEXT 

2160 REM KEY NOT FOUND 
2116 A$ = "SORRY. I COULD NOT Fl 

ND:":A2$ = "> " + A$(0) + " 

<": IF LEN (A2$} > 40 THEN 

A2$ = A$(0) 
2120 AX = 1: GOSUB 1176 
2130 RR = RX: GOSUB 220: GOTO 145 


2146 REM CORRECT RECORD? 
2150 GOSUB 1310: HOME : PRINT : PRINT 

"IS THIS THE RECORD YOU WANT 

? (Y/";: INVERSE : PRINT "N 

";: NORMAL : PRINT ") ";: GET 

AN$: IF AN$ = "Y" THEN POP 

: GOTO 1470 
2160 IFANS= CHR$(27}THEN POP 

:RR = RX: GOSUB 220: GOTO 14 

50 
2176 HOME :A$ = "> SEARCHING <": 
GOSUB 1390; VTAB 10; GOSUB 

1130 
2186 RETURN 

2190 REM >>READ A RECORD<< 
2200 HOME : PRINT : HTAB 5: PRINT 

G$"ENTER RECORD NUMBER TO RE 

AD: ";;CT = 0:VT(CT) = 26:LN 

(CT) = 3:H2(CT} = 34;HT{CT) = 

H2(CT):NN$(CT) = STR$ (RR); 

A$(CT1 = "":ED = 1; GOSUB 97 


2216 IF LEN tA$(CT)) < 1 THEN 1 

450 
2226 HOME 
2230 RX = VAL (A$(CT)): IF RX < 

1 OR RX > RC THEN PRINT CHR$ 

(7): GOTO 2200 
2240 RR = RX 

2250 GOSUB 220: GOTO 1450 
2260 REM PRINT SCREEN DATA 
2270 IFRR = 6 THEN 1410 
2280 HOME : VTAB 19: PRINT "TURN 
ON YOUR PRINTER! THEN PRESS 
IRTNl";; NORMAL : GET A$ 
2290 HOME ; PRINT "PRINT TEST PA 
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nERN FOR ALIGNMENT?": PRINT 

; HTAB 10; PRINT "lYIES OR [ 

N]0": 
2306 GETA$: IF A$ < > "Y" AND 

A$ < > "N" THEN 2360 
2310 IF A$ = "N" THEN PRINT : GOTO 

2396 
2320 D1 = 1: PRINT ; PRINT 0$;"PR 

tf'.PH: FOR D = 1 TO NF; PRINT 
SPC(HT(D) - D1): IF HT{D) < 
> H2(D) THEN PRINT NN$(D); 
SPC( H2(D) - (HT(0) + LEN 

[NN$(D)))) 
2330 PRINT LERS aE$,LN(0)):: IF 

VT(0) = VT(D + 1) THEN 01 = 

H2(D) + LN(D): NEXT : GOTO 2 

360 
2340 PRINT : IF VT(D) + 1 < VT(D 
+ 1} THEN FOR S3 = VT(D) + 

2 TO VT(D + 1): PRINT : NEXT 
2356 01 = 1: NEXT 
2366 PRINT : PRINT D$"PR#0": HOME 

: PRINT "DO YOU WANT ANOTHER 
TEST?"; CHR$(8) 
2370 GET A$: IF A$ < > "Y" AND 

A$ < > "N" THEN 2370 
2380 IF A$ = "Y" THEN 2320 
2390 PRINT "DO YOU WANT TO PRINT 

THE WHOLE FILE" 
2400 GET A$: IF A$ < > "Y" AND 

AS < > "N" THEN 2400 
2410 IF A$ = "Y" THEN BZ = 1: FOR 
ZB = 1 TO RC:RR = ZB: PRINT 
: PRINT D$"PR#0": GOSUB 230: 
VTAB 24 
2420 D1 = 1: PRINT ; PRINT D$"PR# 
"PR: PRINT ; PRINT ; FOR D = 

1 TO NF; PRINT SPC( HT(D) - 
01); IF HT(D) < > H2(D) THEN 

PRINT NN$(D); SPC( H2(D) - 
(HT{D) + LEN (NN${D)))) 
2430 PRINT A$(D):; IF VT(D) = VT 

(D + 1) THEN D1 = H2(D) + LEN 
(A$(D)}: NEXT : GOTO 2470 
2446 PRINT : IF VT(D) + 1 < VT(D 
+ 1} THEN FOR S3 = VT(D) + 

2 TO VT(D + 1); PRINT : NEXT 
2450 01 = 1: NEXT 

2460 IF BZ THEN NEXT ZB:BZ = 
2470 PRINT : PRINT D$"PR#0": GOTO 

1450 
2486 REM DELETE A RECORD 
2490 IF RR = OR RC = THEN 14 

10 
2506 AS = "YOU ARE ABOUT TO ERASE 
A RECORD" :A2$ = "DO YOU WIS 

H TO PROCEED?" :AX = 0: GOSUB 

1170: IF ANS < > "Y" THEN 1 

450 
2516 IF RR = RC THEN RC = RC - 1 

:RR = RC; GOSUB 220: GOSUB 3 

10: RETURN 
2520 HOME ;A1 = RR:RR = RC; GOSUB 

220: HOME :RR = A1 
2530 RC = RC- 1; IF RC < THEN 

RC = 
2540 GOSUB 310 
2556 RETURN 
2560 REM EXIT PROGRAM 
2570 IF NOT PP THEN 2590 
2580 PR# PR: FOR H = 1 TO 36: PRINT 

: NEXT H: PR# 0: CALL 1002 
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2598 REM 

2600 TEXT : HOME : PRINT : PRINT 

CHR$ (4)"RUN HELLO.DB" 
2610 REM STATUS DISPLAY 
2620 PRINT CHR$ (7}: POKE 772,2 

55; GOTO 1450 
2630 RT = 450:NF = 17: DIM yT(18) 

,HT(18),NN$(18),M$(18),AS(18 

),H2{18),LN{18),BY(18) 
HOME : VTAB 3: PRINT "WHAT 

IS THE NAME OF THE FILE": INPUT 

N$: !F N$ = "■• OR LEFTS (N$ 

,1} < "A" THEN 2640 

ONERR GOTO 2758 

PRINT DS"VERIFY"N$: POKE 21 

6,0 

GOSUB 340 
2680 PR = 1 
2690 OFS = 0$ + "OPEN" + N$ + ",L 

":RF$ = D$ + "READ" + N$ + " 

,R":WF$ = DS + "WRITE" + N$ + 

",R":GL$ = D$ + "CLOSE": FOR 

D = 1 TO40:TE$ = TE$ + "X": 



2640 



2650 
2660 

2670 



CHECKSUMS 



10 
20 

30 

40 

50 

60 

70 

80 

90 

95 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 
210 
220 
230 
240 
250 
260 
270 
260 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 



- $BADD 

- $9813 

- $4D3B 

- $AD92 

- $C899 

- $FF65 

- $A3BF 

- $A9O0 

- $924D 

- $2608 

- S2D63 

- $C342 

- $5349 

- $B595 

- $8931 

- $BA4C 

- $AE4A 

- $F5E4 
-$411A 

- $308B 

- $836B 

- $254D 

- $22E4 

- $64E9 

- $9844 

- $CDA1 

- $E069 

- $90E2 

- $3AF0 

- $7BE5 

- $DC22 

- $0396 

- $A083 

- $174F 

- S8896 

- $C63F 

- $D130 

- $E01B 

- $45 B5 

- $E22D 



410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 

600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 



$7980 
$903C 
$C453 
$7767 
$1184 
$1C1B 
$EC21 
$2D01 
$309 D 
$0E23 
$5C04 
$F8B8 
$18E0 
$4741 
$BF4C 
$951 F 
$F9B1 
$E2CD 
$6E1A 
$4490 

■ $620D 
■$1F29 

■ $7185 

■ $76B3 
$F7C6 
$3430 
$B4BC 

■ $23B4 

■ $D72B 

■ $403B 

■ $CA1C 

■ $93EE 

■ $A267 

■ $B482 
$0D01 
$2951 
$0A78 
$3CFD 

■ $245C 

■ $EE27 



NEXT 
2780 GOSUB 270:RC = RO:ID = 10 
2710 DIM S$(RT) 
2720 VTAB 2: GOSUB 1370: VTAB 18 

: GOSUB 1370: POKE 34,18 
2730 RR = RC: GOSUB 220: GOTO 145 


2740 REM FILE NOT ON DISK 
2750 POKE 216,0: TEXT : HOME 
2760 EM$ = N$ + " IS NOT ON THIS 

DISK" 

2770 PRINT G$G$: VTAB 5: HTAB 20 

- LEN (EM$) / 2: PRINT EM$ 

2780 VTAB 10; HTAB 4: PRINT "PLE 

ASE INSERT CORRECT DATA DISK 
II 

2790 VTAB 12: HTAB 3: PRINT "RET 
URN TO CONTINUE OR ESC TO EX 
IT ";: GET A$ 

2800 IF A$ = CHR$ (27) THEN HOME 

: END 
2810 IF A$ = CHR$ (13) THEN RUN 

2820 PRINT G$; GOTO 2790 



810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 

1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1190 



$CE0A 
$E0C3 
$40A8 
$45A9 
$ECE4 
$E9C3 
$9E6A 
$1F17 
S08F6 
$33D7 
SD3D3 
$8AB8 
$D52F 
$BCA4 
$D1D0 
$F02F 
$A654 
$055B 
$FABF 
$3A8D 

$7C86 
$5113 
$926F 
$8F43 
$28A0 
$B02C 
$D38E 
$2E15 
$B42A 
$EE87 
$0083 
$9F3C 
$92BC 
$D4B8 
$676D 
$050C 
$8C80 
$3706 
$1F0A 
$905F 



1200 
1210 
1220 
1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 

1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 



- $ADBF 

- $732C 

- $A320 
-$1F72 

- $F346 

- $5702 

- $0B7B 
-$AC1A 

- $A8F4 

- $B4F2 

- $707E 

- $0C68 

- $8274 

- $C3B2 

- $4673 

- $7828 

- $B29C 

- $E962 

- $88AF 

- $4AD8 

- $BDC4 

- $660D 

- $8366 

- $A562 

- $F839 
-$11E6 

- $C053 

- $780B 

- $5433 

- $E19C 

- $3720 

- $8B9D 

- $F3C7 

- $EE83 

- $A6CA 
-$AF79 

- $B05F 

- $CF58 

- $A117 

- $63BC 



1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 



1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 



2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 



- $A40E 

■ $67FC 

■ $4137 

■ $AB94 

■ $69D1 
$A86D 
$1178 
$DCD6 
$8D05 
$AD7F 
$58A8 
$32C3 
$6778 
$8313 
$40DD 
$00D2 
$F336 
$632D 
$ECF8 
$0CA6 



£8438 

$0011 

$9ACA 

$F38C 

SBB01 

$8AE2 

$9512 

$267 E 

$6900 

$BF2C 

$D7C2 

$1506 

$CC9E 

$A0D3 

$DC87 

$BC0F 

$E0C4 

$A30B 

$6EF8 

$4796 



$0961 

$6992 

$BD8D 

$7B3B 

$EA28 

$79C0 

$9A1A 

$6B8A 

$1A35 

$0F10 

$5EB0 

$A5AD 

$E360 

$5C65 

$C7A1 

$2069 

$85A8 

$7CFB 

$4260 

$6E00 



2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 
2340 
2350 
2360 
2370 
2380 
2390 

2400 
2410 
2420 
2430 
2440 
2450 
2460 
2470 
2480 
2490 
2500 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 



$8DB7 
$9C8F 
S60BF 
$50BC 
$C223 
$92CB 
$81 5F 
$3F3F 
$8085 
$8004 
$B6B5 
$FB0D 
$3F08 
$EF94 
SC7AB 



• $a8£5 
$13A5 
$73F7 
$C7DA 

$7F61 

$DB03 

$BCEF 

SA1A8 

$5F67 

$6604 

$31 4F 

$6548 

■ $2489 
$73C1 
$4FA1 
$47C4 
$8008 
$0BDE 
$3306 
$6995 
$2A34 
$F9BC 
$1FC3 

' $EC05 



2600 


- $B73E 


2610 


- $15B9 


2620 


- $7FD7 


2630 


- $B18A 


2640 


- $BODB 


2650 


- $B206 


2660 


- $C08E 


2670 


- $667A 


2680 


- $5D82 


2690 


- $3E9F 


2700 


- $F0F3 


2710 


- $0808 


2720 


-$8744 


2730 


- $AF6D 


2740 


- $D228 


2750 


- $8160 


2760 


- $B48E 


2770 


- $F8AE 


2780 


- $35F8 


2790 


- $7AA0 



2800 
2810 
2820 



$F5F8 
$1BD7 
$E529 



# 
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S oft key For 
Mask Of The Sun 

By John J. Liska 

MASK OF THE SUN, 
Ultrasoft, Inc. 
24001 SE 103rd St. 
Issaquah, WA 98027 

REQUIREMENTS: Apple ][ Plus 
One disk drive (two are preferred) 
Mask of the Sun program disk 
DOS system master 
One blank disk 

Now you can unlock one of the most 
maddening adventures you have ever 
attempted to solve- 

Mask Of The Sun 

By Ultrasoft 

In this diabolical foray, your quest 
is to retrieve the legendary Mask of the 
Sun and live to tell the tale. You will 
encounter many things along the way 
which will defy common sense and 
your own intuitive logic, yet must be 
met. 




The basic procedure is the same as 
the modified COPYA/DOS combina- 
tion used to unlock ZORK (Computist 
#1). The only ctiange to DOS seems 
to be the use of non-standard end 
marks on tracks $03 through $22 and 
incorrect checksums on the DOS 
tracks. 

The first problem is to get the infor- 
mation off the original disk and onto 
the copy disk, here is how: 
1) Boot the 3,3 Master Disk. 
PR#6 

2} Clear program in memory and initial- 
ize the front side of the disk you wish 
to copy to 
FP 
INIT SIDE A 

3) Drop into the monitor 
CALL-151 

4) Modify DOS so that it ignores end 
marks and checksums. 



B92D:18 60 
8989:18 60 

5) Put back in the system master and 
use COPYA to copy SIDE B to the 
back side (the side you didn't initial- 
ize in step 2). 

RUN COPYA 

6) When finished with the back side, 
use FID to copy every file (using the 
wildcard ( = ) and prompting features 
of FID) from side A except "LL(V27)" 
to the front side of the freshly INITial- 
ized disk. 

BR UN FID 

We now have all the files copied ex- 
cept the one that checked for copy pro- 
tection. In order to make this disk work, 
we have to make a start up file. 

7) Type in this start-up program and 
save it to the front side of the copy. 
10 PRINT CHR$( 4) "EXEC DISK" 
SAVE SIDE A 

That's it! Whenever you boot, you 
will get a FILE NOT FOUND message, 
but that is O.K. The reason for this is 
because the text file named DISK is 
trying to BRUN LL{V27), but since it 
isn't on this disk, DISK just goes on to 
the next command. 

You now have a copy of Mask of the 
Sun on a normal disk for you to exa- 
mine until you bust {or solve the adven- 
ture, whichever comes first). 

Now, would someone please tell me 
how I can get past the BLASTED 
snake! «g 



Upper & Lower Case 
Output For Zork 
By Brian Burns 

Requirements: Apple //e or ][ plus 

with lower case 

Sector editor such as DiskEdit 

or Disk Zap 

Any Infocom Adventure (not just Zork) 

If you own an Apple lie, or have low- 
er case on your II or II Plus, you are 
entitled to the following modification for 
Infocom adventures. This modifica- 
tion allows the game to display all of 
its messages in upper and lower case 
instead of all capital letters. If you 
didn't know already (I doubt you did), 
all of the text in any of Infocom's ad- 
ventures is stored on the disk as up- 
per and lower case (not in ASCII form, 
but as 3 characters compacted into 2 
bytes). However, since not ALL Apples 
have lower case display as does the 
Apple lie, the lower case text must be 
converted to upper case before being 
printed to the screen. This is accom- 
plished by a short routine which I will 
show you how to remove from the disk. 



1) Make a copy of your Infocom game 
with the Softkey for Zork in Hardcore 
COMPUTIST #1, or the Softkey for 
Witness in Hardcore COMPUTIST #4. 
(These are exactly alike and either 
Softkey will work on any Infocom 
game). 
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2) After making the copy, run your sec- 
tor editor program and read track 2, 
sector 9 of tlie disk you just made. 

3) Look at bytes AC through 56 (with 
older versions of ZORK I and It this 
area has been moved to bytes 9D 
through AS). They should contain the 
following.... 

eg 6e 90 07 eg 60 B0 03 38 E9 20 

4) Replace this code eleven EA's. 

5) Write this sector back to the disk. 

6) Read track 2 sector 7. 

7) Change byte 9D from 3F to FF and 
write it back out. 

8) Read track 2 sector B and change 
byte FC from D1 to ©2. 

9) Write the sector back out and you're 
donel 



Explanation of Procedure 

The first step is necessary for two 
reasons. First, most sector editor pro- 
grams only work on normal (or normal- 
ized) disks. Second, it is NOT a good 
idea to make changes to your original 
disk (that is why it is write-protected). 

Steps two through five inactivate the 
routine that converts the letters to up- 
percase. 

Steps six and seven stop the room 
and score information at the top of the 
screen from being printed in inverse. 
This is necessary because when 
lowercase tetters are inversed (AND- 
ed with $3F), they become meaning- 
less garbage. 

Steps eight and nine alter the text 
window so that there is a blank line be- 
tween the information at the top of the 
screen and the text of the game. This 
just helps to distinguish that informa- 
tion from the rest of the game. 

I think you'll find upper and lower- 
case much easier on the eyes. Have 
fun. 



For our U.S readers: 

When ordering back is- 
sues, please note that we 
ship most orders United 
Parcel Post, 



Continued from page 4 

are not really hackers but who have 
one the programs in question, can ac- 
tually follow along cook-book fashion 
and come out the other end with the 
desired results. Thanks! 

I also very much appreciate the 
responses to most of the letters pub- 
lished in the Input section. One of the 
most frustrating things in most 
columns of this type is to have a read- 
er ask a question In print, and then find 
one must wait three or four months (or 
more) to get even a preliminary an- 
swer. Now, if you would just increase 
the size of the Input section,,, Oh well, 
can't have everything at once, 

A personal preference would be few- 
er softkeys for games and more for ap- 
plications programs, but of course, I 
realize you have readers of all in- 
terests. Like others, I too have a wish 
list of programs for which I have been 
hoping to see softkeys. My list includes 
Sensible Speller, Visibtend, Basic Ac- 
counting and The Accountant among 
others. A suggestion: If you were to 
print the Top 30 or Top 50, it might give 
the hackers out there an idea of which 
programs are most in need of softkeys. 

Finally, a need of my own: Does any- 
one know of a relatively inexpensive, 
programmable add-on keyboard. I am 
thinking of something like the VIP Key- 
Whiz, which is really what I want. But 
the price of VIP is so outrageous, it is 
out of the question. I thought a board 
called Keyport 717 might be the an- 
swer (it sells for $175 as opposed to 
- $450 for VIP), but all of its functions are 
loaded Into the Apple's memory and it 
requires a real programmer's 
knowledge to adopt to a particular ap- 
plication program. The VIP, on the 
other hand, puts the functions the user 
wants into its own RAM and requires 
no knowledge of programming. If only 
its price were not so high! Any ideas? 

Once, again, thanks for the great im- 
provement in the magazines. Keep up 
the good work! 

Thomas E. Militello, M.D. 
Rancho Palos Verdes, CA 

Dt. Militello: We think your suggestion 
that we print a "wish list" of softkeys 
is an excellent one. In fact, because of 
your suggestion and the tremendous 
response we received from our readers 
after requesting softkeys /n Hardcore 
COh/fPUTiST no. 5., we can see no rea- 
son to delay printing the "Most Want- 
ed List." 

You can find this list on page 4 of 



this issue. 

Our staff would like to thank you for 
your suggestions, encouragement and 
the compliments on Hardcore COf\A- 
PUTIST no. 5. 

Worried About a Crash 

I enjoy your magazine very much 
and look forward to every issue, 

I have Flight Simulator II and cannot 
make a backup copy, 1 have tried Copy 
II +, Nibbles Away II and Pirates 
Friend, None of these will copy it. Do 
you know something about this 
program? 

Tom Peragine 
Pompano Beach FL 

Mr Peragine: Sorry, we do not as yet 
have a means to backup the excellent 
Flight Simulator II. We have included 
f^S-ll in our new "Wanted List" which 
you can find on page 4 of this issue. 



Another Wish List 

The latest Hardcore was the best 
ever, I especially appreciated the boot- 
code tracing, 

I would appreciate your giving atten- 
tion to the following: 1) Sensible 
Speller seems to have everyone baf- 
fled. Why? 2) Broderbund is especial- 
ly hard to copy. One gets fi) track errors 
and even nibble counts, but "Arcade 
Machine" won't boot. It will run if the 
Master is booted first, but... 3) Is there 
any way you could interview "Mr. Xe- 
rox" or Krac-Man? Their talents for 
breaking stuff all the way down to FID- 
able files is amazing. 4) You might 
mention that "Cracking techniques" 
featuring material by the above is avail- 
able through Pirates Harbor. However, 
I have not found it very helpful because 
it assumes I know DOS better than I 
do. 5) I am sure you have seen the 
Fast-Copy program (called Pirate's 
Friend, Fastass Copy, etc.) that copies 
5 tracks at a time and works on many 
copy-protected programs. I believe it 
is in the public domain. If you have a 
copy, could you disassemble it and 
give us an overview of the logic of such 
a program. 

I would also like to know the logic of 
the "parameters" one changes in 
Copy II -h or Locksmith. I know there 
are address or data field headers, but 
how does one discover which to 
change and know why? 

Continued on page 31 
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Advanced Playing Techniques 

star Maze 

Contributed by Ferrell Wheeler 

Star Maze 
Sir-Tech Software 

It seems the pinwheel and the wall snait are extremely difficult 
to shoot so, instead of wasting a bomb on them, liere's a method 
for destroying them and anytlning else in the game at no risk: 

1) Drive repeatediy straight into a wall at a fairly slow speed 
until the ship is completely inside the wall. 

2) Once inside, turn around and position the ship so that only 
enough of its nose is sticking out to stillallow for firing. 

When in this position, nothing can hit the ship, not even when 
the snail is walking on the same wall the ship is in! 

You can even use this technique to go through walls, but this 
seems to use up a lot of fuel. 

The Wizard and the Princess 
Contributed by Donaid Oltveau 

The Wizard and the Princess 
Sierra On-Line Systems 

If the player "dies" in this game, there's a way to revive him 
or her. When the computer asks you," Do you wish to play again?" 
after the "death" has occurred, answer "hJ" for no and then press 
"RETURN" twice. This restores you to life at the spot you were 
"killed" with all your inventory intact. 

Wizardry: Proving Grounds of the Mad Overlord 

SIr-Tech Software 

It seems as though a lot of Wizardry players already know how 
to create a very powerful bishop, but here is the technique anyway: 

1) Take the bishop into the maze and then camp, 

2) Inspect the bishop's character and choose the identity ("I") 
option. 

3) Keep trying to identify item #9 until the word "success" ap- 
pears at the bottom of the screen. 

4) The bishop should now have 100,000,(900 expehence points. 

Adventure Tips 

Cranston Manor 

Sierra On-Line Systems 

Knights in armour do not like rodents. 

Drown the computer to get the platinum sphere. 

Time-Zone 

Sierra On-Line Systems 

There is more than one piece of jade 
in the Chinese Garden. 

The Wizard and the Princess. 

Sierra On-Line Systems 

Try kissing an amphibious creature. 
The giant seems to be fond of music. 
Don't waste time on peasant women. 

Mask of the Sun 

Ultrasoft 

While under the Temple of the Sun, be sure to 

wear the mask before every move. 

The cat may need its head. 

It's tough to shoot reptiles in the dark. 

Deadline 

Infocom inc. 

Dig for evidence in the rose garden. 

Hardcore COMPUTIST 
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You have better things to do 
than slave over a hot iteyboard. 



Save yourself hours of 


typing! 


Library Disk #5 


$9.95 ~1 


Hardcore COMPUTIST #7: 




Corefiler Disk Directory Designer | 


Library Disk #4 


$9.95 i 


Hardcore COMPUTIST #6: 




Modified ROMs Crunchlist 




Crucial Code Finder 




Library Disk #3 


,.....$9.95 n 


CORE Games issue; 




Destructive Forces 




Dragon Dungeon 




Library Disk #2 


$19.95 Ij 


CORE Utilities issue: 




Hi-Res Utilities Dynamic Menu 




Line Find GOTO Replace 




GOTO Label Fast Copy 




Hardcore C0MPUTIST#3: 




Map Maker 




Hardcore COMPUTISTM: 




Ultima II Character Generator 




Dfsl( Control 


$15.00 C 


Disk Edit lOB 




Menu Disk View 




Please print clearly: 




NAMF 




ADDRESS 


CITY STATE 


ZIP 


COUNTRY 




nVISA : MC 


EXP 


SIGNATURE 




US funds only. 


Send order to: 


Washington state Hardcore COMPUTIST Program Library | 


residents add 7,S1'o 


P.O. Box 44549 


saies tax. 


Tacoma, WA 98444 


Foreign orders add IWa postsge & handling. 


HC7 


Please silow 4-6 wMks for delivery. 
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Continued from page 7 

This will tell you the loading location of the last BLOAD- 
ED file. It will appear "backass wards" with the low byte 
first and the high byte second (i.e., ©0 88 is equivalent to 
$©800). Do a Sfflffl! to list the first screen-full of the program. 

Upon examination, you see that the accumulator is load- 
ed and then stored in a location within DOS, After this hap- 
pens a few times, you will see a JSR (jump to subroutine) 
at $B7B5. Now you may ask, "What is all this stuff?" 

On-Line is using the second stage of DOS to load in the 
game of Mouskattack. You are looking at the first stage (of 
three stages) of the load and are actually tracing the boot 
as described in earlier issues of Hardcore COMPUTIST, 
but using normal DOS. 

The listing will appear as follows: 



0800- 


LDA nm 




9602- 


STA $87EB 


;Volume matches anything 


0805- 


LDA #$ei 




0807- 


STA $B7F4 


;Commandcode, 1=Read 


a80A- 


LDA #$18 




080C- 


STA $B7EC 


Track # to start loading from 


080F- 


LDA #$03 




0811- 


STA $B7ED 


;Sector # to start loading from 


0814- 


LDA #$95 




0816- 


STA $B7F1 


;Hlgh byte of page to load to 


0819- 


LDA #$00 




081B- 


STA $B7FB 


;Low byte of page to load to 


081E- 


LDA #$03 




0822- 


STA $14 


;Sector counter in zero page 


0824- 


IDA #$B7 




0826- 


JSR $B7B5 


;RWTS sector read routine 


0829- 


BCS $0822 


iBranch to $822 If Error 


082C- 


INC $B7F1 


[Increment page to load 


082F- 


INC $B7ED 


Increment sector to load 


0831- 


DEC SI 4 


; Decrement sector counter 


0833- 


BNE $0822 


;lf sector # <> branch to $822 


0835- 


JMP $9500 


;Jump to $9508 



Starting with track 18, sector 3, the data is being loaded 
into location $95(M. 

The sector number and memory page in which the data 
will be stored is incremented and the process continues un- 
til sector F of track 18 is reached. Jump to location $95lM 
to start the next stage of the load. If you jump to the moni- 
tor at location $835 instead of $9500, you can examine the 
next stage of the load. Do this by typing 
835:4C 59 FF N SOflG 

At $95(M, the same thing happens again but in a larger 
perspective. The codes become more obscure and difficult 
to follow, so I won't list them here. 

But now you ask, "What was the purpose of this ex- 
ercise?" 

By examining the code at $9500, you can find the start- 
ing page at which Mouskattack loads. You can even find 
the starting location! Can you see where? 

The starting location of the loading program is at $A0O 
and the starting location of the loaded program is at $5300. 
This is the reward for ail your labor! 

Since the load code lives at $9500 and DOS occupies 
$9000 and up, Mouskattack must live from $AiM to $94FF, 
with a starting location at $5300. Not mentioned is the third 
load which overwrites the demo code. This load is the only 
part of the disk that is really protected. Our COPYA copy 
will work up to this load, but not past it, for the game. 

Keep in mind that the code from $900 to $95FF is not 



destroyed by a slave boot. Since Mouskattack lives within 
this area, it then becomes easy to crack. Here is the 
procedure: 

1) Boot your original copy of Mouskattack. 

2) After the demo and, when the prompt HOW MANY 
PLAYERS? appears, insert a blank, initialized slave disk. 

3) Hit "Reset." It does not matter if you have an old-style 
monitor or not. With an autostart monitor, your slave disk 
will boot. 

4) Enter the monitor. 
CALL-151 

5) To enable you to save larger binary files to disk, type: 
A964:FF 

6) Type in 
9FD:4C 00 53 

7) Save the program 

BSAVE MOUSKATTACK,A$9FD,L$8B03 

8) Have fun with the game! 

Remember how I mentioned that the load of Mouskat- 
tack was rather slow? This is due to the method in which 
sectors are read in from the disk. 

Also, the sector number increments along with the page 
number loaded to. If On-Line had started with the high page 
number, instead of the low page number and read the sec- 
tors in decreasing order, instead of incrementing order, the 
load would have taken a fourth of the time, providing the 
manufacturers had used normal DOS 3,3 skewing. 

This is the logic that the fast-loading DOS's have talten 
in order to increase loading and save time. 



Bugs In Hardcore COMPUTIST #5 



page S 

Step 5 should read: 
5) Load the second file 
BLOAD EDITOR PARTI .OBJS 



Screenwriter II Softkey 



pagB 75 Cracking The Egbert II 

step 6 should read: Communications Disk 

6) Make the moved bootcode JuMP into the monitor after 
loading tracts Q, sector 
•66FS:4C 59 FF N B69iG 

page 18 

Step 35 should read: 

35) Fix the same catalog patch in the RCV program 

-BLOAD RCV 

•4392:20 

•BSAVE RCV,A$4aaa,L$58B 

page 79 - first column 

Tfie two lines foliowing the sentencQ;"Type in the following in immedi- 
ate execution mode;": sfioutd read: 

1F2 = PEEK(175) + PEEK{1 76)'256-a:FOR 
A = 1 TO 4;P0KE F2 + A,»:NEXT 
]SAVE RTTY 

Likewise, the two lines following the sentBnce;"Again in immediate 
execution mode type:"; should read: 

]F2 = PEEK(175) + PEEK(1 76)*256-8:FOR 
A = 1 TO 4:P0KE F2 -i-A,0:NEXT 
]SAVE ECW 

We would like to thank Dennis Goodwin and Dr. Keith Goldstein (author 
of "Cracking The Egbert II Communications Disk") for calling these 
errors to our attention. 
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Surface Rates 
For Our Foreign Subscribers! 



To better serve you, we now offer both surface and 
airmail subscriptions for foreign subscribers. 
Current rates: 

Air Surface 

1 yr $60.00 $40.00 

2 yrs $116.00 $76.00 

3 yrs $170.00 $110.00 

To change your current airmail subscription to a 
SURFACE subscription, complete and mail the 
form on page 11 to: 

Hardcore COMPUTIST 

P.O. Box 44549X 

Tacoma, WA 98499 

Piease allow four to six weeks for change of sub- 
scription to begin. 



Continued from page 28 

Keep up the great work until the insanity of protection 
is ended. 

John Langlois 
Milton Wi 

Mr. Langlois: The Pirate's Friend copy program you men- 
tion seems to bear an amazing resemblance to the eariy ver- 
sions of Copy li Pius. As such, it is doubtfui whether this 
program is in the public domain, although it may seem to 
be because of the number of copies that are floating about. 
You have come up with some good suggestions for fu- 
ture Hardcore COfiAPUTIST articles. Although we can't make 
any promises, we will try to worl< some of your ideas into 
articles for the magazine. 



An Elite Adjustment 

The documentation accompanying the RANA Elite I disk 
drives claims the speed of these drives is not adjustable, 
as are most other Apple-compatible drives. However, I have 
found that on my RANA I the speed can indeed be adjust- 
ed. Here's how: 

1) Remove the disk drive cover. 2) The speed adjustment 
potentiometer is labeled R7 and is located in the middle 
rear of the disk drive analog board. A clockwise adjustment 
of this potentiometer will increase the drive's speed and 
a counter-clockwise adjustment will slow the drive speed. 

Donald L. Russetl 
Faribault MN 

Mr. Russell: Thanks for your tip. We might only add that If 
you make this adjustment you will void your warranty, but 
that is something most people do within 70 minutes of ac- 
quiring a new computer product anyway. 



Whiz Hid 

By Ray Darrah 

Yes, here I am this month with another protection trick. 
Once again, this procedure "Locks Up" a program, but as 
long as it is on a normal disk, it can be copied. 

RESET VECTOR 

By now you've probably heard many times about a pro- 
gram making the reset vector do one thing or another. So 
here is an explanation of how it works. 

It all starts when you press the key marked "RESET." 
Instead of going through the keyboard latch at memory lo- 
cation 49152 {or -1 6384 or $0000), the reset key is connect- 
ed directly to pin 40 of the Central Processing Unit (CPU). 
This is the long chip placed at a right angle to the other 
chips on your circuit board. 

Whenever pin 40 is grounded (i.e. the "RESET" key is 
pressed or the computer is turned on), the microprocessor 
(CPU) stops whatever it was doing and immediately runs 
the program that memory locations 65532 and 65533 
($FFFC and $FFFD) point to. These locations (and the pro- 
gram they point to) are in ROM and therefore, cannot be 
changed by a program. 

RESET PROGRAM 

When the CPU is first turned on, it acts just like pin 4ffl 
has just been grounded (i.e. "RESET" key was pressed). 
Because of this, when the "RESET" key is pressed, the 
program that the CPU runs has to determine if the com- 
puter was just turned on or not. 

To solve this problem, Apple came up with a little sys- 
tem that works nicely. They decided to dedicate three RAM 
memory locations to the task of processing the "RESET" 
key. The first two locations tell the program where you want 
it to go when a "RESET" occurs and the third ensures that 
the location, pointed to by the first two bytes is valid. 

If for some reason the third byte isn't the correct com- 
plement of the second byte (very likely to occur when just 
turned on because the RAM holds random numbers), the 
program assumes that the computer was just turned on and 
runs through the power up sequence which stores good 
values in the three locations, clears the screen, prints "AP- 
PLE It" and tries to boot a disk. On the other hand, if the 
third l>yte is correct, then it merely executes the program 
pointed to by the first two bytes. 

This powerful system of Reset handling enables you to 
"tell" (via POKE) this Reset program to execute a program 
whenever the key is pressed. Or you could fool the program 
by making the powerup (third) byte incorrect. The program 
would then assume the computer to be just turned on and 
run through the above mentioned powerup sequence. 

Now that you have an understanding of the "RESET" 
vector, all that is left to explain is how to make the third 
byte the correct complement of the second, so the com- 
puter won't boot-up when "RESET" is pressed. Luckily, 
the monitor ROM has a subroutine that does just this. 
Otherwise, it would be quite difficult to do from BASIC. 

The procedure: Just POKE in the numbers that point to 
the subroutine you wish to execute and then do a 
CALL-1169. It's that easy! Try this: 
1) Enter the monitor. 

CALL-151 



2) Type in this short program. 
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Not everyone who copies software is a 



firatc 




Even honest users need back-ups. 



Get Out Of The Dark 

1) Exchange tips on program modifications and en- 
hancements 

2) Swap game secrets 

3} Explore Advanced Playing Technipues and get those two 
extra ships when you realty need them. 

Hardcore COMPUTIST... 
What You Can't Get Anywhere Else. 

If you're a vigorous Apple computist, you can't afford to 
be without us any longer. 

Our readers are ahead of the crowd. They get techniques 
to unlock locked software. Hardcore COIVlPUTIST shows 
you how to get into DOS and, once there, how to modify it. 

For beginners, we offer complete application information. 
Specialized tutorials, product reviews, and general interest 
programs are strong components of CORE, the center In- 
sert in each monthly issue of Hardcore COMPUTIST. 

We take pride In offering straight-forward, up-front an- 
swers to questions most asked by Apple users. 

You'll find no gimmicks and no hidden messages. We 
print the things everyone needs and has a right to un- 
derstand. 

Especially you. 



( ) Yes, start my subscription now. 

Annual Subscription Rates: checit one 

U.S ( ) $25.00 

Canada, U.S. 1st Class, APO/FPO. , . ( ) $34.00 

Mexico ( ) $39.00 

Foreign Airmail ( ) $60.00 

Foreign surface mail ( ) $40.00 



NAME. 



ADDRESS 


CITY 
COUNTRY 


ST 


ZIP 


|-;VISA HMC _ 
SIGNATURE 




EXP 



10% Discount for groups of 10 subscribers: 

Each subscriber saves $2,50 off the original yeariy subscrip- 
tion rate of $25.00. That's like getting 10 subscriptions for 
the price of 9. You and nine others can pay only $22,50 each 
for a year of hardcore COMPUTIST. All subscriptions must 
be mailed tog ether. 



Send order to: 



Hardcore COMPUTIST 
Subscription Department 
P.O. Box 44549 
Tacoma, WA 98444 



Continued from page 30 

300: AH 60 AS 18 20 A8 FC AD 30 CO 88 DO F5 20 EA 
03 4C 03 E0 

3) Get back into BASIC. 
E003G 

4) Point the reset vector to our new program. 
POKE1010,0:POKE1O11,3 

5) Make the third byte (location 1812) valid. 
CALL-1169 

6) Press "RESET." 

As the above example points out, the three locations are 
Iffllffl, 1811 and 12)12. It also shows that the routine which 
validates the third byte is at -1169. 

If you don't want to go through the hubub of writing a 
machine language program, you could just fool the com- 
puter by changing the third (or powerup) byte. Try this: 

1 ) Alter the powerup byte by one. 

POKE iei2,ABS(PEEK(iei2)-1) 

2) Press "RESET." 

Wow! It acts like you just turned it on. 
INTEGER CARDS 

All those softkeys that say "Reset into the monitor" work 
because the ROM on those cards have a totally different 
reset program. This different program simply executes the 
monitor program which, needless to say, just puts the com- 
puter in the monitor. 

See you next issue! 



Advertiser's Index 

Applied Engineering inside front 

Bootlegger Magazine 9 
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O 01 MASTER/Beginners Cave 


r 


12 Quest l:or Tre«)re 


LJ 24 Black Mouniain 


D 36 Citadel of Blood 




:.. 


1 3 Caves of Treasure Island 


n 25 Nuclear Nightmare 


D 37 Qnesi for the Hdy Grail 


..; 02 Lair of Lhc Minotaur 




14 Furioso 


n 26 Assault on the Moleiiian 




~: OJ Cave of the Mind 


r 


15 The Heroes' CaMle 


n 27 Revenge o( the Moleman 


touriiameni Adventures 
! ^ 60 Casile or Count Fuey 
E 61 Search for the Key 
n 62 The Rescue Mission 


~ 04 Zyphur River Venmre 


t: 


16 Caves of Moiidanicn 


D 2S Tower of London 


_ 0? Castle of Doom 
7 06 DtMh SEar 


r 


17 MtTljn's Caslle 
]ii Hoganli Castle 


D 2y LosI Island of Apple 
C 30 Underground City 


__ 07 Devil's Tomb 


1 . 


19 Deaih Trap 


P 31 Gatuitlet 


EAMON Utilities 


;. OS AOduaor's Quarters 


[.■ 


20 The Black Death 


32 House of III Repute 


i;: 01 EAMON Utilities 


C 09 Assault of rhe Clone Master 


c 


21 Quest for Matron 


r ^ 33 Orb of Polaris 


C 02 EAMON Utilities 


U 10 Magic Kingdom 


[■; 


22 Senators' Chambers 


CI 34 Death's Gateway 


U 03 EAMON Utilities 


fill Tomb of jVlolinar 


n 


23 Temple of Ngurcl 


D 35 Lair of the Mutants 


C Dungcor Designer Ver 5 



linclosc S4.00 for each EAMON scenario volume that you order or see our special EAMON collectors offer. 



Special Collector's Offer 

Every EAMON volume (including Utilities) 
ALL for only $140 

□ YES! Send me the entire 
EAMON collection. 



Make ctiecks payable to: 

Computer Learning Center 

P.O. Box 45202 

Tacoma, WA 98445 

No purchase orders or C.O.D. 

Washington state residents add 7.8% sates tax. 

Foreign orders add 20% for shipping and handling. 



The MASTER disk is required to play any EAMON scenario. I 

Adventure scenarios ate packed on dotible-sitJed disks. Minimum Order: 2 Volumes. ($8.00) 

Name 

Address 

City 



State 



Zip 



Country 

u VISA n MC #_ 
Signature 



Phone 



Exp Date 



U.S. funds only. Make checks payable to: Computer Learning Center 



Wander through a land full of dangers and rewards. 

Battle strange and wondrous creatures. Uncover hidden treasures. 

In EAMON, you roam through a fantasy world where 

you control the action and your destiny is in your hands. 





Avoid the I.R.S 

(Inadvertently Ruined Software) 
You need software insurance. Copy n PC (ibm) 



Diskettes are fragile, and when a protected program is 
damaged, the results are expensive and inconvenient. If 
you have a backup diskette, though, you can have your 
Apple, IBM or compatible computer back on line writhin 
seconds . . .affordably. That's software insuraiyje. 

Copy n Plus (Apple |[, If Plus, lie) 
This is the most widely used backup program for the 
Apple. Rated as "one of the best software buys of the 
year" by InCider magazine, its simple menu puts nearly 
every disk command at your fingertips. The manual, 
with more than 70 pages, describes protection 
schemes, and our Backup Book " lists simple 
instructions for backing up over 300 popular programs. 
A nevir version is nowr available that is easier to use and 
more povt^erfu! than before. Best of all. Copy II Plus is 
still only $39.95. 

Wildcard 2 (Apple jl, jl pius, iie) ^ 

Designed by us and produced by Eastside Software, 
Wildcard 2 is the easiest-to-use, most reliable card 
available. Making backups of your total load software 
can be as easy as pressing the button, inserting a blank 
disk and hitting the return key twice. WOdCard 2 copies 
48K, 64K and 128K software, and, unlike other cards, 
is alwrays ready to go. No preloading software into the 
card or special, preformatted diskettes are required. 
Your backups can be run with or without the card in 
place and can be transferred to hard disks. $139.95 
complete. 



This is THE disk backup program for the IBM PC and 
PC/XT that backs up almost anything. Others may make 
similar claims, but in reality, nothing out performs Copy 
11 PC .. .at any price. Copy il PC even Includes a disk 
speed check and is another "best buy" at only $39,95. 



We are the backup professionals. Instead of diluting 
our efforts in creating a wide variety of programs, we 
specialize in offering the very best in backup products. 
So, protect your software investment, before the I.R.S. 
gets you. 







.^" 






IBH OBK COf^ mOOftAM 



Lmportant Notic«: These pronjucis are provided for ths purpose of an&bling you to 
niake archival copias uoly Undar ths Copyrighi i-a^. vouh as tlj9 oiviiQr of a coMpuier 
program, ^r9 entitled Lo make a oew copy for archival purposes only, and thess 
products wi][ enRble you to do sfi- 

ThflGQ productEi Are suppliod for no itihGt purpose and you are ne^ permiued to 
LLtllize them for any use, other than that specified 



CENTRAL POINT 
Software, Inc. 

The Backup Professionals 




To order, call 503/244-5782, 8:00-5:30 Mon.-Fri., or send 
your order to: Central Point Software, 9700 SW Capitol Hwy 
Suite 100, Portland, OR 97219. Prepayment is required. 
Please include $2 for shipping and handling ($8 outside U.S. 
or Canada). 



